关于perl编解码问题

angeler

我在弄一个邮箱subject解析的程序，可是subject中存在中文，造成解析出现问题。
具体字符串为"=?gb2312?B?Ym8x08O7p7X3sumz9bK9veHC29LUvLDQ6NKqyKt0ZWFtzazRp9DQtq/G8A==?=
        =?gb2312?B?wLS1xLy4uPbQobmk1/d+?="
请问可以用Encode 包进行解码么？应该如何实现。谢谢各位

flw

1. use Encode qw(decode);
   
2. 
   
3. my $str = '=?gb2312?B?blablablabla.......=?=';
   
4. $str = decode( 'MIME-Header', $str );

复制代码

angeler

谢谢版主，问题已经解决~~