全角英数字を半角英数字に変換したい

全角英数字を半角英数字に変換する方法を教えて下さい。

$data =~ tr/０-９ａ-ｚＡ-Ｚ/0-9a-zA-Z/;

以上のようにした場合、J-perl意外では望みどおりに変換されません。

jcode.plをつかって
全角英数字を半角英数字に変換する方法があると、
書かれていた方がいましたので、
できればjcode.plをつかった場合の
具体的なスクリプトの書き方を教えて下さい。

よろしくお願いいたします。

No.1 ベストアンサー 回答者： MtHill 回答日時： 2002/01/26 22:09

jcode.pl を使って $data の全角文字英数字を半角英数字にするには、次のようにするとできるかもしれません。

&jcode::tr(\$data, '０-９Ａ-Ｚａ-ｚ－', '0-9A-Za-z-');

参考 URL で詳しく書かれていますので、ご覧ください。

参考URL：http://www.mikeneko.ne.jp/~lab/kcode/jcode.html# …

この回答へのお礼

スクリプトをEUCにして、

&jcode::tr(\$data, '０-９Ａ-Ｚａ-ｚ－', '0-9A-Za-z-');

と書くとうまくいきました。

ありがとうございました。

お礼日時：2002/01/26 23:14