• ベストアンサー

全角ひらがなを判定するには

Perlの送信フォームからの受信システムで $name_kana=$in{'name_kana'}; if($name_kanaが全角かなか判定){ 全角かなの時の処理} else{ そうじゃない時の処理} としたいのですが、$name_kanaが全角かなか判定するにはどんな条件式を書いたらよいのでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

jperlなどで日本語が使えるのであれば、   if($name_kana=~/^[ぁ-ん]+$/) { 日本語が使えないのであれば、 文字コードが日本語EUCなら、   if($name_kana=~/^(\xA4[\xA1-\xF3])+$/) という感じで如何でしょうか。

souta_n
質問者

お礼

返事が遅れました。 すみません。 無事できました。ありがとうございます。

関連するQ&A

専門家に質問してみよう