URL: https://www.opennet.me/cgi-bin/openforum/vsluhboard.cgi
Форум: vsluhforumID9
Нить номер: 7525
[ Назад ]

Исходное сообщение
"перехватить ctrl+c (остановку скрипта)"

Отправлено sergeyfromkomi , 04-Авг-08 17:44 
Добрый день! Как на winxp и ActivePerl5, перехватить ctrl+c (остановку скрипта),
до этого момента(до обработки ctrl+c) мне нужно успеть в скрипте сделать :
"$session->close;" (закрыть telnet сессию).

Заранее спасибо !!!


Содержание

Сообщения в этом обсуждении
"перехватить ctrl+c (остановку скрипта)"
Отправлено alexey , 05-Авг-08 09:04 
>Добрый день! Как на winxp и ActivePerl5, перехватить ctrl+c (остановку скрипта),
>до этого момента(до обработки ctrl+c) мне нужно успеть в скрипте сделать :
>
>"$session->close;" (закрыть telnet сессию).
>
>Заранее спасибо !!!

Можно попробовать -
$SIG{INT} = sub { do what you need };
но нужно убедиться что это работает в Windows ( в Unix точно работает, но вот насчет Windows
у меня уверенности нет)


"перехватить ctrl+c (остановку скрипта)"
Отправлено sergeyfromkomi , 05-Авг-08 11:38 
>Можно попробовать -
>$SIG{INT} = sub { do what you need };
>но нужно убедиться что это работает в Windows ( в Unix точно
>работает, но вот насчет Windows
> у меня уверенности нет)

не срабатывает...



"перехватить ctrl+c (остановку скрипта)"
Отправлено Arpo , 05-Авг-08 13:06 
>>Можно попробовать -
>>$SIG{INT} = sub { do what you need };
>>но нужно убедиться что это работает в Windows ( в Unix точно
>>работает, но вот насчет Windows
>> у меня уверенности нет)
>
>не срабатывает...

Помнитца мне был модуль "sigtrap", попробуй может то ято нужно.
Почитай тут http://www.xav.com/perl/lib/sigtrap.html


"перехватить ctrl+c (остановку скрипта)"
Отправлено jd2 , 07-Авг-08 02:33 
Возможно это покажется странным, но более дельные советы по винде могут дать на форумах, посвящённых именно винде. Впрочем, если ответы вроде "не знаю, как в Windows, но в UNIX должно работать так..." Вас вполне устраивают, продолжайте спрашивать в конференции "Программирование под UNIX" - здесь всегда рады ответить на любые вопросы. Хоть бы и по астрофизике ;)

"перехватить ctrl+c (остановку скрипта)"
Отправлено angra , 07-Авг-08 03:22 
Ну всегда можно посоветовать почитать man perlport, хотя если используется именно Active Perl, то конечно никаких гарантий дать нельзя.