もっとスマートな方法がありそうだけど・・・。Encode::Guessを使うと、JIS(ISO-2022-JP)の判別がうまくできないんだよなあ。ISO-2022-JPでソース書くなって感じではあるけど。 use strict; my %code = (177=>'shiftjis', 27=>'7bit-jis', 142=>'euc-jp', 23…