HI
am using the following code


my $user = "root";
my $pass = "root";
my $host = "192.168.239.108";
my $cmd = "ls";
use Net::SSH::Perl;
my $ssh = Net::SSH::Perl->new($host);
$ssh->login($user, $pass);
my($stdout, $stderr, $exit) = $ssh->cmd($cmd);
print("$stdout, $stderr, $exit");


but am getting the bellow response
"Can't set socket non-blocking: Bad file descriptor at C:/Perl/site/lib/Net/SSH/Perl.pm line 216."




can some one tell me the reason for this response?