|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Roman Skvirskij 2:5020/400 05 Jun 2002 13:11:07
To : Artem Chuprina
Subject : Re: Запретить вывод ошибок
--------------------------------------------------------------------------------
Hello, Artem!
You wrote to "Roman Skvirskij" <roman@loveme.spb.ru> on Wed, 5 Jun 2002
06:58:15 +0000 (UTC):
AC> Здравствуй, Roman Skvirskij.
RS>> Hello, Andrey!
RS>> You wrote to Roman Skvirskij on Tue, 4 Jun 2002 11:25:42 +0000
RS>> (UTC):
AS>>> Roman Skvirskij wrote:
RS>>>> Hello, Andrey!
RS>>>> You wrote to Roman Skvirskij on Tue, 4 Jun 2002 10:21:56 +0000
RS>>>> (UTC):
AS>>>>> Roman Skvirskij wrote:
RS>>>>>> Проблема следующая - как в перловом сценарии запретить вывод
RS>>>>>> ошибок и предупреждений? Ошибки я обрабатываю, а вот сообщения
RS>>>>>> хотелось бы убрать.
AS>>>>> 1. Разобраться в причине их возникновения и ликвидировать
AS>>>>> причину.
AS>>>>> 2. Если так и положено ругаться в данном месте (вероятность 1 к
AS>>>>> 10 000)
RS>>>> Hеправильно. Сервер БД может быть недоступен по многим причинам.
AS>>> Да ради Бога, пусть будет недоступен.
AS>>> $dbh = DBI->connect($data_source, $user, $pass, {
AS>>> PrintError => 0,
AS>>> AutoCommit => 0 });
AS>>> if (!$dbh) {
AS>>> ....
AS>>> }
AS>>> Где тут требуется какое либо подавление варнингов?
RS>> Я ошибся. Предположим, что таблица исчезла. В этом случае при
RS>> выполении в eval я получаю варнинг. Честно говоря, я в перле не
RS>> силен, но я в eval переопределил SIG{__WARN__} и все стало ОК.
AC> Hет, все-таки меня поражает, на что готов пойти человек, лишь бы не
AC> читать документацию...
AC> $ perldoc DBI /PrintError
Упс :))
Спасибо :)
(Сироту всяк норовит обидеть...)
With best regards, Roman Skvirskij. E-mail: roman@loveme.spb.ru
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
