|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alex Dedul 2:450/82 10 Oct 2002 16:24:10
To : Igor S Chencov
Subject : alarm signal problem
--------------------------------------------------------------------------------
Hi, Igor !
Помню когда-то , 09 Oct 02 в 14:05, Igor S Chencov напиcал для Alex Dedul
нижecлeдyющee:
IC> AD: обработчика был переход на следующую строку, которая if($socket) ?
IC> AD: Заранее спасибо.
IC> Попробуй так -
IC> $SIG{ALRM} = sub { die "alarm\n" };
IC> eval {
IC> alarm ($opt_timeout);
IC> . . .
IC> alarm(0);
IC> };
IC> if ($@ && $@ ne "alarm\n") {
IC> print "Unknow error $@" ;
[...]
Hе то к сожалению, обработчик сигнала видимо выполняется в контексте
текущей программы, а не евала, поэтому после die имеем реальный выход из
программы, а не из евала.
WBR, Alex
--- GoldED+/W32 1.1.4.7
* Origin: Iron Hills Lab. (2:450/82)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
