- バックアップ一覧
- 差分 を表示
- 現在との差分 を表示
- ソース を表示
- Perl/日本語処理/全角半角の変換 へ行く。
- 1 (2012-05-23 (水) 08:02:34)
全角半角の変換
use utf8の環境な場合
Lingua::JA::Kanaのzenkaku2hankaku()等を使う。
use encoding 'euc-jp'な場合
$str =~ tr/0-9A-Za-z/0-9A-Za-z/;
みたいにtrで変換する。
UTF8フラグ付きの環境じゃない場合
Jcode->new($str, 'euc-jp')->tr('A-Za-z0-9','A-Za-z0-9');
Jcodeを使う。