37,719
社区成员
发帖
与我相关
我的任务
分享字符串变量里包含特殊字符打印出现乱码如何解决，求助大神
use Encode qw(encode decode);
use Encode::Locale;
my $name = "name——";
print "1name is $name \n";
print "2name is $name \n";
$name2 =decode("utf8",$name ,1);
print "3name is $name2\n";
name变量包含特殊字符——
我打印出结果：
1 name is ces——
2 name is ces鈥斺€?
3 name is ces鈥斺€?
如何解决2，3的乱码问题？
use Encode::Locale;
my $name = "name——";
print "1name is $name \n";
print "2name is $name \n";
$name2 =decode("utf8",$name ,1);
print "3name is $name2\n";
name变量包含特殊字符——
我打印出结果：
1 name is ces——
2 name is ces鈥斺€?
3 name is ces鈥斺€?
如何解决2，3的乱码问题？
...全文
请发表友善的回复…
发表回复
关山路遥 2016-07-21
- 打赏
- 举报
在文件的第一行加# -*- coding:utf-8 -*- 试试
