equinox79
5/10/2012 - 8:16 AM

perlの正規表現の「\w」について

perlの正規表現の「\w」について

use Encode;

$hoge = "あかさたな";
print "まっち" if($hoge =~ /\w/);       # 出力されない

$hoge = decode('utf8', "あかさたな");
print "マッチ" if($hoge =~ /\w/);       # 'マッチ'