[求助]汉字编码问题

[求助]汉字编码问题
汉字编码问题

perl中默认open方法没法用\w提取utf8文件中的汉字，必须加”:utf8”，加了之后出现新问题：文件中读出的字符串没法匹配中文，perl中赋值产生的中文字符串与文件读入的字符串还是不同编码

...
$line=<File>; #$line='孩儿'
print "t\n" if ($line =~ /儿/); #匹配失败
...

后来瞎碰用如下方法解决

use Encode qw/encode decode/; #这个是什么不知道，照抄的
...
$line=<File>; #$line='孩,儿'
$tmp = decode('utf8',"儿"); #开始用encode不行
#后来乱试decode竟然行了@.@
print "t\n" if ($line=~/$tmp/); #匹配成功
...


现在的问题是如何才能设置perl源代码本身全部用utf8编码，省去decode的步骤？

呵呵，你自己的源代码也用.
呵呵，你自己的源代码也用utf8编码。