(株)(一文字)が含まれたSJISテキストファイルを読み、そこにパターンマッチさせたいのですが
うまくいきません。それ以外のアスキー文字はマッチします。
if($contents =~ /\x{870a}/) {
print 'hit\n';
}
でヒットしません。
$contentsには、ファイルを
while(<FILE>) {
$contents .= $_;
}
で入れてあります。
できればSJISのまま処理したいです。
何かやりかたが間違っていますでしょうか?
まずはお願いなのですが、
お使いのOSや、Perlのバージョンなど、
何も判らないと原因の特定は難しくなりますので、必須だとご記憶ください。
不適当な回答が集まっても混乱をきたしますから、私への返信欄か、
あるいは、コメント欄を開く設定に変更してコメント欄)に、
書き加えておくことを勧めます。
0x878aでやってみたけどヒットしませんでした。
\x{8762}(メートルの一文字)でも試しましたが同じくヒットしませんでした。。
失礼しました。
OS: linux
Perlのバージョン: v5.8.8
単にPerlの表記上の誤りでは、との先入観があったので、これらを書き忘れてしまいました。