http://www.perlmonks.org?node_id=1004632


in reply to UTF8 issue with Net::POP3

use Encode ();

$subject = Encode::decode('MIME-Header', $subject);

[download]

In Section Seekers of Perl Wisdom