Cannot decode string with wide characters at ...

2010年12月9日に持ち込まれた謎

Windowsでperlを動かす。

Encode::from_to($line, "shiftjis", "utf8" );

の行で
Cannot decode string with wide characters at...
と怒られる。

$lineのUTF-8フラグが立っているのが悪いらしい。

$line_off = Encode::encode_utf8($line);

とすると、怒られなくなった。