perlIO对中文的支持

perlIO对中文的支持

其实perl对国际化非常的支持，例如在windows下读入一个gbk(cp936)的文本,然后要转化为utf8的文本输出，代码如下：

use Encode;

use Encode::CN;      #最后包含这个包，以为对以后编译有好处。

use PerlIO;      # 同上




open(FILE, "<:encoding(gbk)", "gbk.txt");      # 这里自动解码成utf8
@lines = <FILE>;
 close(FILE);

   

open(F, ">:utf8", "utf.txt");      # 自动编码成utf8.
print F @lines;
close(F);


这样可以省得再打开以后在编码。