ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Igor S Chencov                       2:5020/400     24 Oct 2001  17:19:03
 To : omen
 Subject : Re: Прервать скрипт
 -------------------------------------------------------------------------------- 
 

 omen <vkardash@ciklum.net> wrote:
 
 o> Добрый день.
 o> У меня есть скрипт. Я хочу, что бы если он допустим работает больше минуты я
 o> хочу его прибить. Можно ли как нить это реализовать ?
 
   $SIG{ALRM} = sub { die "alarm\n" };
 
   eval {
     alarm ($TIMEOUT);
     . . .
     alarm(0);
   };
 
   if ($@ && $@ ne "alarm\n") {
    print "Unknow error $@" ;
   } elsif ($@) {
    print "TimeOut";
   } else {
    print "Ok";
   }
 
 Bye !
 -- 
 -= Игорь Ченцов - системный администратор   |         =-
 -= E-mail chs@aquilon.ru       |  АКВИЛОH      =-
 -= г. Архангельск          |       =-
 --- ifmail v.2.15dev5
  * Origin: Internet-Arkhangelsk Company (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    Прервать скрипт   omen   24 Oct 2001 15:06:29   Прервать скрипт   Alexandr Murin   24 Oct 2001 21:46:03   Re: Прервать скрипт   Igor S Chencov   24 Oct 2001 17:19:03