Encodeの判定方法さらにJEncodeのコード判定を直しました。ところでJcodeとEncode(Encode::Guess)の判定精度の違いですが、Jcode.pmではeuc,sjis,utf8それぞれで一番多くマッチしたものが判定結果になります。これに対してEncode::Guessでは指定した文字コードでdecodeできないものを篩にかけていきます。utf8'などになってしまうわけです。今回はsjisかeucかわからない場合だけ、その文字列をeucと仮定してdecodeし、日本語にマッチするかチェックするようにしました。これで相当判定精度が高まっています。いわゆる半角カナなどの文字に対しては、失敗する場合がありますので、要修正です。半角カナ等)/x;とできます(参考:perl5.8のUnicodeサポート)。JEncodeはこれを使って補助判定しています。罫線っていうか、こんな感じになりました。(2004-04-16)[ツッコミを入れる]本日の日記はツッコミ数の制限を越えています。EUC-JPの文字列「GOOGLEニュース」(googleは全角大文字)がUTF8だと認識されるということに気づいた。perl5.6での話なので5.8ではどうなるかわからない。