Просмотр сообщений
1
Perl / как отключить сообщения об ошибках консоль
« : 06 Августа 2008, 11:41:06 »
имеется консольный скрипт на языке перл.
строка вида:
sub mysql_qwery {
$sth=$dbh->prepare($_[0]);
$sth->execute;
$sth->finish;
}
mysql_qwery("INSERT INTO baze.tmp_cat_keyword$prefix VALUES (0,\'$idbook\',\'$k\');") ;
выводит в консоль множество строк:
DBD::mysql::st execute failed: Dudlicate entry \'......\' for key 2 at ... line 37
как можно отключить вывод сообщений об ошибке именно в этом участке кода?
строка вида:
sub mysql_qwery {
$sth=$dbh->prepare($_[0]);
$sth->execute;
$sth->finish;
}
mysql_qwery("INSERT INTO baze.tmp_cat_keyword$prefix VALUES (0,\'$idbook\',\'$k\');") ;
выводит в консоль множество строк:
DBD::mysql::st execute failed: Dudlicate entry \'......\' for key 2 at ... line 37
как можно отключить вывод сообщений об ошибке именно в этом участке кода?