# $str に半角カタカナが含まれているか判定する
if ($str =~ /\x8E/) { print "含まれている\n"; }
半角カタカナが含まれているかどうかを判定するには,EUC-JP では /\x8E/ を調べるだけでできます。
(perlメモからの引用です)
トラックバックURL: http://bob777.net/mt/mt-tb.cgi/49
このページは、Bobが2006年2月 1日 11:33に書いたブログ記事です。
ひとつ前のブログ記事は「CM」です。
次のブログ記事は「Movabletype3.2へ移行という名のリニューアル」です。
最近のコンテンツはインデックスページで見られます。過去に書かれたものはアーカイブのページで見られます。
コメントする