怎样用Perl处理中文文件？ - 未名空间MITBBS历史存档

国际科技财经博客移民网络热点娱乐民生时事公众号

Redian新闻

>未名空间

>AnthroLing - 人类学和语言学

怎样用Perl处理中文文件？

怎样用Perl处理中文文件？# AnthroLing - 人类学和语言学

o*e2011-10-03 07:10

1 楼

我使用英文版的windows。请问如何用Perl script处理中文文件？需从CPAN上下载什么
modules和字库吗？有没有简单的example script可以看一看？另外，什么text editor
可以保存utf, unicode, 以便用来写中文Perl script?
再一问题是，我的计算机是64bits 的。我只找到32 bits 的nmake.ext。哪里可找到64
bit 的?

d*u2011-10-03 07:10

2 楼

我以前下载perl，用的都是默认设置，中文就可以处理啊。
只是文件要用utf8
utf16我没试过，应该也可以

editor
64

【在 o*********e 的大作中提到】

: 我使用英文版的windows。请问如何用Perl script处理中文文件？需从CPAN上下载什么
: modules和字库吗？有没有简单的example script可以看一看？另外，什么text editor
: 可以保存utf, unicode, 以便用来写中文Perl script?
: 再一问题是，我的计算机是64bits 的。我只找到32 bits 的nmake.ext。哪里可找到64
: bit 的?

o*e2011-10-03 07:10

3 楼

谢谢！比如我有这么一个简单的script
--------
use Encode;
$string="中文短句";
$str=decode("gb2312",$string);
open (OUT, ">chinese_text.txt");
print encode("utf-8",$char),"\n";
print OUT encode("utf-8",$char),"\n";
-------------
这一script 显示在屏幕上（print statement) 和输出文件里(print OUT statement)
都是乱码。不知何故？

o*e2011-10-03 07:10

4 楼

错了。应该是
use Encode;
$string="中文短句";
$str=decode("gb2312",$string);
open (OUT, ">chinese_text.txt");
print encode("utf-8",$str),"\n";
print OUT encode("utf-8",$str),"\n";

o*e2011-10-03 07:10

5 楼

d*u2011-10-03 07:10

6 楼

我以前下载perl，用的都是默认设置，中文就可以处理啊。
只是文件要用utf8
utf16我没试过，应该也可以

editor
64

【在 o*********e 的大作中提到】

o*e2011-10-03 07:10

7 楼

o*e2011-10-03 07:10

8 楼

错了。应该是
use Encode;
$string="中文短句";
$str=decode("gb2312",$string);
open (OUT, ">chinese_text.txt");
print encode("utf-8",$str),"\n";
print OUT encode("utf-8",$str),"\n";