|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Pavel Ammosov 2:5020/52 11 Jun 2001 13:18:22 To : Alexander Bolotnov Subject : Re: DBI:mysql -------------------------------------------------------------------------------- AB>Pavel, AB> 11 Jun 01, Pavel Ammosov -> Alexander Bolotnov: >> Если надо из своей софтины, можно при коннекте писать PrintError=>1 и >> переоблить $SIG{__WARN__} чтоб он в лог писал. AB>то есть - переоблить? сорри, что не врубаюсь. это опечатка. Переопределить, ie: $SIG{__WARN__} = sub { print STDERR join("", @_); print LOG join("", @_); } Подробности в man perlvar, на тему хэша %SIG. >> Хотя, эта идей мне не понятна: если сервер БД ругается, то ошибка, на >> мой взгляд должна быть фатальной и продолжать работу смысла, скорее >> всего, нет. AB>да нет. имхо. например, при таких руганях можно и жить еще: AB>a-3DBI::db=HASH(0x87ff55c)->disconnect invalidates 1 active statement handle AB>(ei ther destroy statement handles or call finish on them before AB>disconnecting) at select.pl line 8. Тут лучше причину пофиксить -- закрывать курсоры: my $c = $dbh->prepare('...'); $c->execute(); .... $c->finish; <-- вот это его и закроет. -- I use technology in order to hate it more properly. -- Nam June Paik --- FIDOGATE 4.4.0-snp10 * Origin: Zenon N.S.P. news server (2:5020/52.0) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/284755867bc43.html, оценка из 5, голосов 10
|