deal with RFC 2047 encoded words (improved), Perl module