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


Do you know where your variables are?
	PerlMonks

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

by blahblahblah (Priest)

on Jun 17, 2009 at 00:42 UTC ( [id://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";
[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.

Comment on Re^3: Mime::Parser utf-8 issue Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://772181]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others sharing their wisdom with the Monastery: (4)

As of 2024-04-26 00:15 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found