$ssh->error and die ...

##</code><code>##

Use of unitialized value $check in pattern match (m//) at /usr/local/lib/perl5/site_perl/5.12.2/Net/OpenSSH.pm line 662

##</code><code>##

$Net::OpenSSH::debug = 5;