problema nel fare una sessione SSH usando perl - perl

use Net::SSH::Perl;
my $ssh = Net::SSH::Perl->new("$host",22);
$ssh->login("$user","$pass");
my $out = $ssh->cmd("show clock");
print $out;

Ho lo script sopra per avere una sessione ssh usando perl ma sto avendo il messaggio di errore "Impossibile mappare il nome del servizio" ssh "sul numero di porta". Sto usando il sistema operativo Windows. Per favore, avvisami dove ho sbagliato.

risposte:

Prova ad aggiungere ssh al tuo file dei servizi. Il file dei servizi si trova in:

%SystemRoot%system32driversetcservices

La linea che vorrete aggiungere sarà simile a:

ssh 22/tcp  # Secure Shell Login