[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:08774] Q: Perl 5.8.0 cp932 regexp match?



ふくしです。
たまに出てきて質問で申し訳ありません。

今日から ActivePerl5.8.0 を導入しました。
OS は Windows xp Professional です。
狙いは cp932 のコードを正規表現で使うものです。

以下のスクリプトはすべてcp932で書いています。

---
# ひらがなを含む行を検索 -- 動作しない

use encoding 'cp932';

while (<DATA>) {
	print if /[ぁ-ん]/;
}

__DATA__
こんにちは is hello
さようなら is goodbye
All English
---

とやってみましたが1行も引っ掛かりません。
どうすればいいのでしょうか。
perldoc を1日逍遥しましたが探し方が悪くてうまくみつかりません。
よろしくお願いします、、。

-- 
fukushi

Index Home