ivaneeo's blog

自由的力量,自由的生活。

  BlogJava :: 首页 :: 联系 :: 聚合  :: 管理
  669 Posts :: 0 Stories :: 64 Comments :: 0 Trackbacks

其实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);


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

posted on 2006-04-18 20:34 ivaneeo 阅读(416) 评论(0)  编辑  收藏 所属分类: perl-杀鸡就要用牛刀

只有注册用户登录后才能发表评论。


网站导航: