Perlのスクリプトの文字コードはEUCにする。
入出力するものはjcode.plで変換する。
っていうか、このスレじゃなくてプログラム板行けよ…