作者kornelius (c9s)
看板Perl
标题Re: [问题] 如何把utf8所有的标点符号取代掉?
时间Wed Apr 22 00:34:18 2009
请 $ file your_file 一下,看一下 encoding 为何
如果你是用 windows 的笔记本,很有可能还是 big5 encoding.
假设你的档案已经是 utf8 , 可以在开档就指定以 utf8 读入
open my $fh, '<:encoding(UTF-8)', 'file';
如果你是读入 big5 档案,请使用 from_to 做转换
use Encode 'from_to';
$utf8 = from_to($big5, "big5", "utf8");
相关资料:
perldoc -f open
perldoc Encode
perldoc perluniintro
: 推 piglon:我是用perl5.10 04/21 20:24
: 推 piglon:我写了另一支程式测试是可以的 应该是我输入有问题 04/21 20:36
: → kornelius:应该是你的 input 非 utf8. 04/21 20:42
: → kornelius:please use Encode module. 04/21 20:42
: 推 piglon:不好意思我不会使用Encode module 虽然有人做笔记但看不懂 04/21 22:00
: 推 piglon:我输入的档案用笔记本打开是utf8可是却又比对不到= = 04/21 22:31
--
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 113.61.194.203
1F:推 abliou:推阿!! 04/22 00:39
※ 编辑: kornelius 来自: 122.117.168.163 (04/23 00:54)
2F:推 piglon:真抱歉没有马上给你回应 有点是耽搁了 我马上试一下 04/23 14:17