problem polegający na tworzeniu sesji SSH przy użyciu 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;

Mam powyższy skrypt, aby mieć sesję ssh używając perla, ale mam komunikat o błędzie "Nie można odwzorować nazwy usługi" ssh "na numer portu." Używam systemu operacyjnego Windows. Proszę mi doradzić, gdzie się mylę.

Odpowiedzi:

Spróbuj dodać ssh do pliku usług. Plik usług znajduje się pod adresem:

%SystemRoot%system32driversetcservices

Linia, którą będziesz chciał dodać, będzie wyglądać tak:

ssh 22/tcp  # Secure Shell Login