如何实现一个登陆后执行命令的脚本？

unicornx

想实现登陆到远程的服务器上执行shell命令，比如查看远程服务器上的ls

#!/usr/bin/perl
#
#login into DomainName by using account XXX@YYY
#
system("ssh -l username server-domain");

system("ls");

为何第二条命令执行不成？该怎么写啊，谢谢。

magnet2008

了解一下Expect工具，很好很强大。

珞水的大叔

如果想要在程序内部远程执行命令，则每次都须用ssh
嫌麻烦就写个函数，比如：
sub remotecmd($){
      my $cmd = shift;
      system("ssh -l username server-domain $cmd");
}
然后每次用函数来执行ls或其它命令即可，如：
&remotecmd("ls");

如果想要交互式，比如说执行程序后，就在命令行中让你输入远程想要执行的命令并给出返回
就可以用Expect，不过这个我不熟，可以请达人help