perl處理big5編碼中文繁體的問題求教

saintbin

有這樣一段字符串:"=?big5?B?xf2n2q3MpKSw6g==?=”  
補(bǔ)充說明：這是摘自郵件頭中的信息，應(yīng)該是先經(jīng)過了big5編碼，然后經(jīng)過base64編碼。其對應(yīng)的原文為：讓我們中國

我知道是big5編碼的中文繁體，用perl怎樣將它轉(zhuǎn)換成gb2312中文繁體字并輸出呢？因為perl中文環(huán)境一般為gb2312，即便輸入繁體也是gb2312編碼的？

請各位大蝦賜教，謝謝��！

[ 本帖最后由 saintbin 于 2009-12-26 15:43 編輯 ]

naihe2010

use Encode qw/from_to/;

$str = from_to 'big5' 'gb2312';

這樣兒就可以把big5編碼的$str轉(zhuǎn)換成gb231的。

use MIME::Base64;

$out = decode_base64 $str; 可以把base64的$str解碼。

ziggler

轉(zhuǎn)碼即可。