perl转字符编码
gb2312转Utf8的方法:use Encode;
my $str = "中文";
$str_cnsoftware = encode("utf-8", decode("gb2312", $str));
Utf8转gb2312的方法:
use Encode;
my $str = "utf8中文";
$str_cnsoftware = encode("gb2312", decode("utf-8", $str);
或用
use Encode;
Encode::from_to($octets, "iso-8859-1", "cp1250");
页:
[1]