Perl 输出中文乱码问题解决方法
| 很多小伙伴在使用 Perl 语言的时候，经常会遇到这样一个问题，Perl 不支持中文？perl 输入或者输出中文会出现乱码。这时怎么办呢？ |
方法/步骤
就以 windows 上的 ActivePerl 为例。
代码特别简单，就是一句:
print "你好";
却出现了乱码，如图。
遇到这样的问题，我们要怎么办？
其实就是 perl 编码的问题，这其实和我们操作系统的编码有关。
我们打开 cmd 命令提示符，输入 chcp 获得编码类型代码。
可见，这里的 windows 是代号 936 为默认编码格式。
然后我们可以看到，936 代码页对应的是 gb2313（即中文），或者说是 gbk。
我们知道了我们 windows 是用 gb2312 编码的，这时我们只要改变编码格式即可。
在代码头部输入：
use utf8; #引入utf8模块 脚本内的字符串使用utf8作为编码格式 binmode(STDOUT,":encoding(gbk)"); #标准输出使用gbk作为编码格式，也可以把gbk改为gb2312 binmode(STDIN,":encoding(gbk)"); #如果涉及到输入流，例如读文件，不加这条读中文文件会出现乱码 binmode(STDERR,":encoding(gbk)"); #如果异常错误中的字符串有中文，请加上STDERR，否则也会出现乱码 print "你好";
此时是不是就能正常输出中文了呢？
一定要注意一点，如果代码涉及到读取中文的文件，一定要加 上binmode(STDIN,":encoding(gbk)");。
还有一种方法，针对我们 STDIN、STDOUT、STDERR（即标准输入、标准输出和标准错误）统统使用某种编码作为编码格式。
还是那个简单的小程序，print 输出一个中文。
代码如下：
use utf8; use open ":encoding(gbk)",":std"; #标准输入、输出、错误皆用gbk编码格式进行编码 print "你好";