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

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";
[download]

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.

In Section Seekers of Perl Wisdom