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