> > 変換前の文字列はUTF8だよ(;´Д`)
> > あれが化けた結果が3日前の文字化けﾎﾟｽﾄだった
> 横からだが
> use utf8;
> して一旦$textをdecodeしてからsjisにencodeするんだ

encode( 'sjis', decode_utf8($text)って感じで試したけど駄目だった(;´Д`)
perl5.10と5.8両方入れてやったけど駄目だったからEncode.pmあたりが変わったのかもしれない

参考：2013/04/03(水)00時14分26秒