gb2312转Utf的方法:
use Encode;
my $str = "中文";
$str_cnsoftware = encode("utf-8", decode("gb2312", $str));
my $str = "中文";
$str_cnsoftware = encode("utf-8", decode("gb2312", $str));
Utf转 gb2312的方法:
use Encode;
my $str = "utf8中文";
$str_cnsoftware = encode("gb2312", decode("utf-8", $str);
转自
http://www.sysab.cn/a/pro/perl/2009/1204/7951.html