Perlについての質問箱 26箱目
レス数が950を超えています。1000を超えると書き込みができなくなります。
0970デフォルトの名無しさん
2006/09/08(金) 09:26:55> 漢数字を半角数字に変換(一→1)、及びその逆(1→一)と、
> 半角数字を全角数字に変換(1→１)、及びその逆(１→1)がしたいのですが、
> 何かいい方法はありませんか？
今ならこう書くだろう。
$ perl -MLingua::JA::Numbers -Mutf8 -e 'print ja2num(q{一二三四五})'
12345
http://search.cpan.org/perldoc?Lingua::JA::Numbers
レス数が950を超えています。1000を超えると書き込みができなくなります。