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

perl諦めなよ(;´Д`)

参考：2013/04/03(水)00時16分29秒