2007-04-09 正規表現「ひらがな」以外の書き込みをチェック tips 開発 掲示板に実装したけど未確認。 if ($in{'comment'} !~ /(?:\x82[\x9F-\xF1])/) { &error; } 漢字を使ってくるSPAM投稿にも有効・・・なはず。 Produce by Sieg: [Perl での正規表現] http://sieg.xeong.com/archives/2005/06/perl.html # 全角ひらがな [ぁ-ん] $str = '(?:\xA4[\xA1-\xF3])'; # EUC-JP $str_sjis = '(?:\x82[\x9F-\xF1])'; # SJIS