フォーム入力のチェック
フォームの入力をCGI(Perl)でチェックするとき、
全角の漢字、カタカナ、ひらがなでの入力以外は禁止にしたいです。
どなたかいい方法をご存知でしょうか?
とりあえず、現在は、
jcode.plで全角英数字⇒半角英数字に変換
フォームに入力された文字列を一文字(半角2文字)ずつ抽出して、
$a=~ s/([^\w ])/'%' . unpack("H2", $1)/eg;
でエンコードしたものが%を含んでいるかどうかで判別してます。
でもこれだと全角英数字と半角英数字しかシャットアウトできません。
記号文字なども入力出来ないようにしたいです。
よろしくお願いします。
お礼
IEでは解決出来ない様なので諦めます Edgeを使います。 ありがとうございました。