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

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

]]>http://www.unix.com.ua/orelly/perl/cookbook/ch16_19.htm]]>

Не работает?

больше спасибо за ответ. Но я не знаю куда поместить эту строку чтобы скрипт постоянно отслеживал это событие... (я не программист, я cisco учу....)

В самое начало

перехватывает.....на программа всё равно закрывается
можно ли программно запретить закрытие консоли....

Что-то я ничего не понял?
Вообще запретить убийство проги?
Ну попробуйте добавить:

$SIG{KILL} = 'IGNORE';
$SIG{TERM} = 'IGNORE';

Но стоит ли оно того?