问：如何解决ActivePerl输出中文乱码问题?

      答：就以windows上的ActivePerl为例。小编的代码特别简单，就是一句print "你好"，却出现了乱码，如图。

      问：遇到这样的问题，我们要怎么办?

      答：1、其实就是perl编码的问题，这其实和我们操作系统的编码有关。我们打开cmd命令提示符，输入chcp获得编码类型代码。可见，小编这里的windows是代号936为默认编码格式。

      2、然后我们可以看到，936代码页对应的是gb2313(即中文)，或者说是gbk。

      3、我们知道了我们windows是用gb2312编码的，这时我们只要改变编码格式即可。

      4、在代码头部输入：

      use utf8;

      #引入utf8模块 脚本内的字符串使用utf8作为编码格式

      binmode(STDOUT,":encoding(gbk)");

      #标准输出使用gbk作为编码格式，也可以把gbk改为gb2312

      binmode(STDIN,":encoding(gbk)");

      #如果涉及到输入流，例如读文件，不加这条读中文文件会出现乱码

      binmode(STDERR,":encoding(gbk)");

      #如果异常错误中的字符串有中文，请加上STDERR，否则也会出现乱码

      print "你好"

      5、此时是不是就能正常输出中文了呢?

      6、一定要注意一点，如果代码涉及到读取中文的文件，一定要加上binmode(STDIN,":encoding(gbk)");