linux - Perl脚本登录服务器并执行命令

Question

很难说出这里问的是什么。这个问题是含糊的、模糊的、不完整的、过于宽泛的或修辞性的，无法以目前的形式得到合理的回答。如需帮助澄清此问题以便重新打开它， visit the help center 。

已关闭 10 年前。

我是 Perl 新手。我想在终端上运行一个 perl 脚本，该脚本接收另一台服务器的 IP 地址，登录它(使用用户名和密码)，执行 bash 命令并返回结果。任何指导将不胜感激。例如。类似的代码、问题、可能有帮助的 Perl 函数等等。

Answer 1

#!/usr/bin/perl -w  
use strict;  
use Net::SSH qw(ssh);  

my $host = "server1.domain.com";  
my $user = "user1";  
my $remotedir = "/home/user1/";  
my $cmd = "/bin/ls";  
ssh("$user\@$host", $cmd);