|
|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexey V Drougov 2:5020/400 17 Nov 2000 20:59:54
To : All
Subject : Re: eval { DBI->connect() }
--------------------------------------------------------------------------------
On Fri, 17 Nov 2000, Michael Samanov wrote:
> Hello, Denis!
>
> At Fri, 17 Nov 00 13:08:25 +0300 Denis Shaposhnikov wrote:
>
> DS> Хочется и в eval {} и сообщение увидеть.
>
> eval { ... };
> warn $@ if $@;
А еще есть неплохой модуль Error.
Он позваляет писать в таком стиле:
try
{
if( что-то )
{
throw SomeException("test");
}
else
{
print "Все получилось!";
}
die "test2";
}
catch Error::Simple with
{
my $exception = shift;
print "Прога вызвала die: $exception";
}
catch SomeException with
{
my $exception = shift;
print "Поймана исключительная ситуация SomeException: $exception";
};
- ---
TSB Russian Express, Moscow
Alexey V. Drougov, friendof@express.ru
http://www.express.ru
--- ifmail v.2.15dev5
* Origin: Russian Express I.S.P. (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/801479b9ce1a.html, оценка из 5, голосов 10
|