mysqld 发表于 2015-12-26 15:48:54

Perl utf8 gbk gb2312

  #!/usr/bin/perl -w
use strict;
use Encode;
#gbk TO uft-8
my $str;
$str = encode("utf-8",decode("gbk",$str));
#$str = encode_utf8(decode("gbk",$str)); # Or use this method
# uft-8 TO gb2312:
$str = encode("gb2312", decode("utf8", $str));
#utf-8 TO gbk
#$str = encode("gbk", decode("utf8", $str));
页: [1]
查看完整版本: Perl utf8 gbk gb2312