Thanks for you reply. It works great. I have only one small problem. When running the proceeding code, I end up with some trash at the beginning of the subject. Such as: ת\xB7\xA2. Any suggestions?
in reply to Re: Mime::Parser utf-8 issue
in thread Mime::Parser utf-8 issue
my $entity = $parser->parse_data($message) or die $!;
my $header = $entity->head() or die $!;
my $utf8 = decode('MIME-Header', $header);
$header = encode('MIME-Header', $utf8);