Re: [問題] 請問 regex 無法正確比對
※ 引述《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
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
Perl 近期熱門文章
PTT數位生活區 即時熱門文章