Net::SSH::Perl

Hi,

i have a problem with the Net::SSH::Perl module. i'd like to code a ssh
client in perl, that needs no special functions. it only has to login
and stay there until disconnection. after that it should reconnect and
so on...
i won't enter any commands at the shell after login...it just has to
login and finito.

but:
with the perl ssh module it connects to the given server, but the login
process does not work, i always get a connection timeout.

where is my fault?

---
loginperl.pl

#!/usr/bin/perl
use Net::SSH::Perl;

my $host = 'my.nice.host';
my $user = 'username';
my $passwd = 'password';

my $ssh = Net::SSH::Perl->new($host, protocol => 2, debug => true);
$ssh->login($user,$passwd);


thx,

martin