无需密码的telnet即可访问远程服务器并执行命令并检索详细信息

Question

当前正在使用telnet在命令行上登录服务器而不输入密码：

telnet -afl root servername

我需要一个脚本，该脚本应该在不使用密码的情况下使用telnet连接到服务器，运行类似wc -l的命令，并检索该命令的结果。

我尝试使用Expect，但是它提示输入密码，并引发错误。有人可以建议可以做到这一点的方法吗？

Answer 1

尝试一下：

#!/usr/bin/env perl

use strict;
use warnings;

use Net::Telnet;

my $t = new Net::Telnet (Timeout  => 10);

$t->open('nethack.alt.org');

$t->waitfor( -match => '/Quit/' );

$t->print( 'w' );

print $t->waitfor( -match => '/Watch which game/' );