作者wawawa (哇哇哇○( ̄﹏ ̄)○)
看板perl
标题Re: [问题] 请问 regex 无法正确比对
时间Tue Jan 3 13:44:22 2006
※ 引述《shane123 (家产有八十七亿  ﰩ》之铭言:
: my $str="星期五";
: my $reg="星期四";
: if($str =~ /$reg/){
: print "Yes!\n";
: }else{
: print "No!\n";
: }
: 请问一下
: 我这段程式比对出来居然显示 Yes!
: 除非改成 my $reg="\"星期四\"";
: 可是我 $reg 预计要让使用者输入的
: 那这段程式该怎麽改呢?
: thanks~
perl 5.8版本之後支援多国语系,
所以在一开始宣告一下你的语系,比对会更精准。
比方我的环境是utf8,那就:
#!/usr/bin/perl
use encoding "utf8";
...
这样。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 163.16.1.95