Select Code to Download

use Net::SSH::W32Perl;

 my $host = 'xxx.xxx.xxx.xxx';
 my $ssh = new Net::SSH::W32Perl($host,debug=>1);
 $ssh->login('user-id', 'passw');

Nalina: Reading configuration data /.ssh/config
Nalina: Reading configuration data /etc/ssh_config
...
Nalina: Socket created, turning on blocking...
Nalina: Remote protocol version 1.5, remote software version Cisco-1.2
+5
Protocol major versions differ: 2 vs. 1 at cisco_ssh.pl line 4