Apr
30
2011
Posted by ebal at
22:39:08
in planet_ellak
Είναι αρκετές οι φορές που κοιτώ το Subject ενός mail για να ελέγξω εάν είναι SPAM ή όχι.
Τι γίνεται όμως, εάν το subject δεν είναι σε ASCII ?
Γιατί γίνεται αυτό: Encoded-Word
Για να μπορώ γρήγορα κι εύκολα να διαβάσω το θέμα ενός τέτοιου email,
έγραψα ένα προγραμματάκι σε perl
#!/usr/bin/env perl
die $0 =~ /([^/]+)$/, " <base64 mail subject> n" unless @ARGV == 1;
use Encode;
use MIME::Base64 qw(decode_base64);
my @values = split ( '?', $ARGV[0] );
binmode STDOUT, ":utf8";
print decode ( $values[1] , decode_base64( $values[3] ) . "n" );
Δίνω ένα παράδειγμα:
$ ./db64.pl =?utf8?B?zqPOlc6czpnOnc6RzqHOmc6RIM6UzpnOn86ZzprOl86jzpfOoyAtIE1BUktFVElORyAtIM6gzpvOl86hzp/Ops6fzqHOmc6azpfOoyAmIM6ozqXOp86fzpvOn86TzpnOkc6jIC0gzpzOkc6qzp/OoyAyMDEx?=
ΣΕΜΙΝΑΡΙΑ ΔΙΟΙΚΗΣΗΣ - MARKETING - ΠΛΗΡΟΦΟΡΙΚΗΣ & ΨΥΧΟΛΟΓΙΑΣ - ΜΑΪΟΣ 2011