|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Oleh Khoma 2:5020/400 22 Jul 2001 18:22:19 To : All Subject : CGI::Carp -------------------------------------------------------------------------------- Привет Всем! Заметил, что если использовать CGI::Carp, ошибки сгенерированные DBI попадают в лог веб сервера 2 раза. Если убрать use CGI::Carp, ошибка показывается один раз, но уже конечно неформатированно. Если же просто умирать на странице самому - никаких дополнительных записей не возникает. Как лучше всего избавиться от этого безобразия? :-) Вот пример: 1: #!/usr/bin/perl 2: 3: use strict; 4: use CGI; 5: use CGI::Carp; 6: use DBI; 7: 8: my $CGI = new CGI; 9: my $dbh = DBI->connect("DBI:mysql:host=my_host;database=my_db;", 10: 'user', 'password', {RaiseError => 1}); 11: 12: $dbh->do("SELECT *"); 13: 14: print $CGI->header, "TEST"; В результате получим в логах: [Sun Jul 22 16:47:21 2001] test.cgi: DBD::mysql::db do failed: No tables used at /www/test.cgi line 12. [Sun Jul 22 16:47:21 2001] test.cgi: DBD::mysql::db do failed: No tables used at /www/test.cgi line 12. [Sun Jul 22 16:47:21 2001] [error] [client 1.2.3.4] Premature end of script headers: /www/test.cgi Если закомментировать строчку номер 5 - получим DBD::mysql::db do failed: No tables used at /www/test.cgi line 12. [Sun Jul 22 16:50:55 2001] [error] [client 1.2.3.4] Premature end of script headers: /www/test.cgi Спасибо! -- Oleh (okhoma@mail.ru) --- ifmail v.2.15dev5 * Origin: Fine Soft Studio (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/647779aa227a.html, оценка из 5, голосов 10
|