UTF-16BE:Malformed LO surrogate d897 at C:/aPerl/lib/Encode.pm line 166っていきなりdieされた…。
いや、もちろん言いたいことはわかるんだけど、何も死ななくたって。
とりあえずググって見るとわりと有名な話みたい。
UTF-16LE:Malformed LO surrogate を避ける - 徒書
http://www.akatsukinishisu.net/itazuragaki/perl/malformed_lo_surrogate.html
ぼくはuse Jcodeしてるだけなんだけど、内部的にはEncodeだからなあ。とりあえず
$Encode::Guess::NoUTFAutoGuess = 1;したけど、やっぱ死ぬ。よほどバイナリっぽいテキストなんだろ。
Encode::Guess->set_suspects( qw(euc-jp shiftjis 7bit-jis utf8) );
しかたないのでevalで囲った。「いばる」。
んー。死ななくてもいいと思うんだけどなあ。なんで死ぬかなあ。ぼくがこれまでに書いたスクリプト、みんないばらないとダメなの?
