in reply to Parsing (Unicode?) characters from Usenet messages

use Encode qw( decode ); decode('MIME-Header', $s)

Encode::MIME::Header