最简单的方法是：
yum -y install perl-Net-Telnet
2、远程服务器安装telnet（安装方法见：
http://tech.ccidnet.com/art/321/20070430/1074877_1.html）
3、本地perl脚本：
use strict;
use Net::Telnet;
#登录信息
#注意，$prompt是登陆后的命令提示行，如果匹配不上，脚本将会timeout
my $password = 'webos123';
my $username = 'hduser';
my $prompt = '/\[.+\]\$ $/';
my $host = 'hadoopcq002';
my $cmd1 = '/usr/bin/who';
my $cmd2 = '/bin/ls -l';
# my $cmd3 = '/home/hduser/scripts/test.sh';
#连接并登录到服务器
my $conn = new Net::Telnet(
Timeout=>60,
Prompt=>$prompt,
);
$conn->open($host);
$conn->login($username,$password);
#分别执行$cmd1和$cmd2命令，并输出结果
my @output = $conn->cmd($cmd1);
print "Output:@output";
@output = $conn->cmd($cmd2);
print "Output:@output";
#断开连接
$conn->close;