perl-输出时-Wide-charactor-in-print-报错

参考网页

有几种方法.

设置输出流的模式

可以在 print 之前添加:

binmode(STDOUT, ":utf8")

打开文件句柄时设置:

#!/usr/bin/perl
use open ":std", ":encoding(UTF-8)";
print "\x{194}\n";
open (FH, ">:encoding(UTF-8)", "gamma.txt");
print FH "\x{194}\n";
close(FH);

使用 utf8::all 模块

#!/usr/bin/perl
use utf8::all;
print "\x{194}\n";
open (FH, ">", "gamma.txt");
print FH "\x{194}\n";
close(FH);