Я пытаюсь в основном выполнить поиск через базу данных с помощью Perl, чтобы узнать, есть ли элемент с определенным идентификатором. Этот поиск не может возвращать строки, но также может возвращать их.
У меня есть следующий код:
my $th = $dbh->prepare(qq{SELECT bi_exim_id FROM bounce_info WHERE bi_exim_id = '$exid'});
$th->execute();
if ($th->fetch()->[0] != $exid) {
...
В основном, это пытается увидеть, был ли ID возвращен, а если нет, перейдите к script. Но он бросает опорную ошибку Null-массива на объект $th->fetch()->[0]
.
Как я могу просто проверить, не вернули ли строки или сейчас?