帰ってきたアニソン三昧

いつからか、getxml2db.plが起動のたびにエラーを吐いて、ものすごいエラーメールが溜まっていた模様。どれも同じで

DBD::SQLite::st execute failed: PRIMARY KEY must be unique at
/home/foltia/perl/getxml2db.pl line 179.
DBD::SQLite::st execute failed: PRIMARY KEY must be unique at
/home/foltia/perl/getxml2db.pl line 182.
DBD::SQLite::st execute failed: PRIMARY KEY must be unique at
/home/foltia/perl/getxml2db.pl line 182.
DBD::SQLite::st execute failed: PRIMARY KEY must be unique at
/home/foltia/perl/getxml2db.pl line 182.
DBD::SQLite::st execute failed: PRIMARY KEY must be unique at
/home/foltia/perl/getxml2db.pl line 182.

エラー箇所では、foltia_subtitleを、PIDとTIDのペアでselectして、ひっかからなければ新規エントリとしてINSERTしているが、そのPIDはすでに登録されていて、PRIMARY KEY制約にあたって死亡。
179行目と182行目で、PIDをSTDERRに出すようにしてgetxml2db.plを実行し、問題のPIDを拾ってみると「帰ってきたアニソン三昧」「劇場版MAJOR」などだった。
これらを手で消して、getxml2db.pl longを再実行すると、無問題。
なんだったのだろう。しょぼカル側でIDをふり直された?
それはともかく。「帰ってきたアニソン三昧」聞きたいのだけど、FMラジオがない。。。radikoNHKはないのね。