半角アルファベット・数字を全角に「すぐに」変換 2005-12-10-2 [Programming] 事情によりASCII英数字を全角にする処理が必要に。nkf V2.0 だと逆はできるんだけどなあ。まあツールを探すよりも早いだろうということで適当にその場しのぎプログラミング[2003-12-09-3](ってワンライナー…)。あとで緊急時にコピペできるようにここに書いておく。 # 半角アルファベット・数字を全角(EUC-JP)にする s/([0-9A-Za-z])/"\xa3".chr(0x80+ord($1))/ge; # 半角アルファベット・数字を全角(UTF-8)にする s/([0-9A-Z])|([a-z])/(defined $1) ? "\xef\xbc".chr(0x60+ord($1)) : "\xef\xbd".chr(0x20+ord($2))/ge; perl -pe
![半角アルファベット・数字を全角に「すぐに」変換](https://cdn-ak-scissors.b.st-hatena.com/image/square/af37977ee866988286b95e74fff98500a190545c/height=288;version=1;width=512/https%3A%2F%2Fchalow.net%2Fimages%2Ftcl-logo-25.png)