問題用perl

Question

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

我上面的腳本用perl有一個SSH會話，但我有錯誤消息 「不能地圖服務名稱‘SSH’端口號」製作的SSH會話。我正在使用Windows操作系統。請告訴我我錯在哪裏。

Answer 1

嘗試添加SSH到您的服務文件。 services文件位於：

%SystemRoot%\system32\drivers\etc\services 

，你要添加的樣子行：

ssh 22/tcp # Secure Shell Login