CGI・Perl例文集 CGI(Perl)のサンプルプログラムをコピー&ペーストで使える便利集! カテゴリー:数値 文字列 全角数字を半角数字へ変換する 全角数字を半角数字へ変換するにはJcodeモジュールで変換してやれば良い。 ;# ;#全角数字を半角数字へ ;# use Jcode; print Jcode->new('1234567890')->tr('[0-9]', '[0-9]')->sjis; 「tr('[0-9]', '[0-9]')」の部分の文字コードはEUCである必要がある。プログラム全体がシフトJISの場合は、変数に入れ、その変数をEUCへ変換した後に渡せば良い。 ■関連ページ ・半角数字だけかチェックする ・半角英字のみかチェックする ・半角英数字のみかチェックする ・半角数字を全角数字へ変換する ・全角カナを半角カナへ変換する ・半角カナを全角