The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

[Perl] Прервать скрипт, если истек таймаут времени его выполнения. (perl signal timeout example)


<< Предыдущая ИНДЕКС Поиск в статьях src Установить закладку Перейти на закладку Следующая >>
Ключевые слова: perl, signal, timeout, example,  (найти похожие документы)
Date: Wed, 24 Oct 2001 13:19:03 +0000 (UTC) From: Igor S Chencov <[email protected]> Newsgroups: fido7.ru.perl Subject: [Perl] Прервать скрипт, если истек таймаут времени его выполнения. 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"; }

<< Предыдущая ИНДЕКС Поиск в статьях src Установить закладку Перейти на закладку Следующая >>

 Добавить комментарий
Имя:
E-Mail:
Заголовок:
Текст:




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру