作者riomusi (ads)
看板perl
标题Re: [问题] 中文字串比对
时间Wed Aug 20 13:11:40 2003
※ 引述《CKPILOT (星空下的钢琴手)》之铭言：
: $word_1 = "---回应---"
: $word_2 = "回应"
: if ($word_1 =~ /$word_2/) {
: print "True!\n";
: } else {
: print "False!\n";
: }
: 可是我却看到的是"False!"
: 请问各位前辈们,请问我该如何解决呢?
: 谢谢:)
: 有位前辈告诉我要在程式前面加上use encoding 'big5';
: 可是我加入了以上程式码之後,我一执行程式就会出现winXP的程式关闭视窗:
: Perl Command Line Interpreter发生问题，必须关闭，谨此致歉。
: 请问我的问题在哪呢??
: 谢谢:)
: OS: winXP
: Perl: ActivePerl 5.8.0 build 806
use Encode;
use encoding 'big5', STDIN => 'big5', STDOUT => 'big5';
另外要将变数的编码设为big5时
加入 $word_1 = decode (big5 => $word_1);
即可
--
※ 发信站: 批踢踢实业坊(ptt.csie.ntu.edu.tw)
◆ From: 140.109.137.34