Hallo,

hat jemand von euch eine Ahnung, wie ich bei folgendem code
ein Timeout von z.B. 10 Sekunden einbauen kann, damit ich nicht
ewig warten muß bis das skript abbricht, wenn der server nicht erreichbar ist?

#!/usr/bin/perl

use Net::SSH::Perl;

require "configfile.cfg";

my $ssh = Net::SSH::Perl->new($server_ip, protocol=>'2,1');
$ssh->login($user, $password) || die "error: could not log in";

Gibt es vielleicht sonst noch irgendeine andere Möglichkeit?

Danke schon mal für eure Hilfe, ich habe jetzt schon 3 Stunden gesucht und nichts gutes gefunden.

lg
Chrisi

Hmm, ich hab mal in die Sourcen von dem Modul gesehen und festgestellt, das Socket genutzt wird und nicht IO::Socket. Mit IO::Socket kannst du im Konstruktor den Timeout festlegen, für Socket hab ich nichts gefunden.
In dem Modul scheint es noch keine Funktion dafür zu geben, aber vielleicht in nem anderen SSH Modul?

Mit alarm vielleicht ?

perldoc -f alarm
perldoc perlipc

edit: alarm funktioniert unter Windows nicht.\n\n

<!--EDIT|coax|1133212061-->