perl下utf8编码和GB2312互相转换的方法

gb2312转Utf的方法：

use Encode;
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);