Perlについての質問箱 4箱目
レス数が900を超えています。1000を超えると表示できなくなるよ。
0925enter
NGNG問題が出てきたのでおしえてください。
($str) = @ARGV;
&jcode'convert(\$str,'euc');
$str = substr($str,0,50);
このように、日本語(どのコードかは不定なので、
ECUに変換する)を50文字でカットして、
DBに追加しようとしているのですが、
追加の際に、たまに、EUCではないコードが発見
されたとして、エラーがでます。
エラーは↓のようなものです。
DBD::Pg::st execute failed: ERROR: Invalid EUC_JP character sequence found (0xbf00)
おそらく、最後の文字が2バイトだったときに
半分にちぎれてしまっているのだと思います。
いろいろ試したのですが解決できません。
なにかよい方法はありませんでしょうか?
上記のエラーがでたときは、DBに文字が追加されないのですが、
強引に追加する方法でもかまいません。
環境
perl5.6.0
DB:postgresql
OS:RedHatLinux7.2
レス数が900を超えています。1000を超えると表示できなくなるよ。