Net-SSH-Perl failed with eval error:
Can't locate object method "blocking" via package "FileHandle" at /efs/dist/perl5/Net-SSH-Perl/1.30/
.exec/x86-64.rhel.5/5.10/lib/perl5/Net/SSH/Perl.pm line 216.
  at ./ssh_bug_test_final.pl line 49.

##</code><code>##

#!/usr/bin/env perl5.10.0
## your use lib as needed...
use strict;
use warnings;
use Data::Dumper;
$Data::Dumper::Sortkeys++;  

use Net::SSH::Perl;
use Net::Telnet;  ## fails 
## use Net::FTP;  ## works


my ($server, $href, $conn, );

$server = 'some.test.server.com';
$href = {
        'debug' => '1',
        'options' => [ 'ChallengeResponseAuthentication no' ],
        'protocol' => '2,1',
        'use_pty' => '1'
};


warn "Running with perl version: %vd\n", $^V;
warn 'preparing to call Net::SSH::Perl. ', Dumper( $server, $href );

eval {
        $conn = Net::SSH::Perl->new( $server, %$href );
};
if ($@) {
        warn "Net-SSH-Perl failed with eval error: \n$@ ";
}
else {
        print 'Net::SSH::Perl succeeds and returns: ', Dumper($conn);
}