Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re^3: Mime::Parser utf-8 issue

by blahblahblah (Priest)
on Jun 17, 2009 at 00:42 UTC ( #772181=note: print w/replies, xml ) Need Help??

in reply to Re^2: Mime::Parser utf-8 issue
in thread Mime::Parser utf-8 issue

Hmmm... I'm not sure. This code works for me, with the header value from your original post.
use Encode; my $header = '=?UTF8?B?5LuO5Y2a5a6i5paH56ug5Lit5p+l5om+5oKo5oSf5YW06La +j55qE5Li7?==?UTF-8?B?6aKY?='; my $utf8 = decode('MIME-Header', $header); print "uft8: $utf8\n";
output is:
uft8: 从博客文章中查找您感兴趣的主题

Of course, I can't read any Chinese, so I have no idea if those are the right characters or just gibberish.