2014-06-18 ひらがな、カタカナの変換 Perl Perlでよく使うのでメモ。エンコードの部分は"utf8","euc-jp"など自由に変更可。 (ただし真ん中のeucは変更しない) use Jcode; .... my $word = 'あかさたな'; $word = new Jcode($word,"utf8")->tr(map {new Jcode($_)->euc}('ぁ-ん','ァ-ン'))->utf8;