|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Evgeny Kariakin 2:5020/744.100 13 Dec 2000 14:15:46 To : Artem Chuprina Subject : Состояние удалленого хоста. -------------------------------------------------------------------------------- Ответ на Artem Chuprina -> Chese . Было: ЧТ 07 Декабря 2000 , 12:50:04 . ciur>> Локальная машина под Linux, удаленная WinNT. ciur>> Открываю коннект к MSSQL ciur>> $dbh = DBI->connect("dbi:Sybase:server=$server", $user, ciur>> $passwd); Ели машина живая, то все ок. Если нет то скрипт висит ciur>> на этой строчке, ни какие TimeOut and LoginTimeOut не помогают. AC> perldoc -f alarm? Я уже спрашивал один раз, но никто не ответил. Обращаюсь конкретно к тебе, как к корифею эхотага. ;-) Кусочек кода: --= тут все аплодируют, аплодируют... [Windows Clipboard] =-- eval { local $SIG{ALRM} = sub { die "alarm\n" }; alarm( 90 ); # # тут обращение к ремоте, ради чего и используется аларм. # alarm( 0 ); }; return( -5 ) if( $@ && $@ ne "alarm\n" ); # ещё один оператор; --= кончили аплодировать [Windows Clipboard] =--------------- Пример взят из perldoc -f alarm , но вместо того, чтобы продолжить работу при таймауте, скрипт выполняет # ещё один оператор; и выходит. Hе знаешь, в чём тут может быть дело? Hу вpоде всё, пока. Евгений Карякин <waf*mail.ru> ... Яблоня от яблони недалеко падает. --- Hападавший 'GoldED+/W32' унёс 1.1.4.3 кг золота. * Origin: Automatic life (2:5020/744.100) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/44983a374e17.html, оценка из 5, голосов 10
|