Encode こっちを使うようにしたかった。 use Encode; print Encode::encode('utf8',decode('shiftjis',$sjis));http://www.hikoboshi.org/perl/doc/encode.html

nkf 別ファイルを作りたくなかった。 nkf --overwrite -e file

調子に乗って色々させてたら、すごく重い。 増やしたいなあ、２Gぐらいに・・・