使用 Expect.pm 在 perl 中处理“--More--”

Question

我有一个设备的 show 命令，其地址为 Mac，我正在使用 Expect.pm 在 perl 中执行该命令。 命令的输出超过 100 行，底部有 --More--。 我能够在 --More-- 第一次出现之前捕获输出的所有内容。 但在那之后就没有了。 我试过 while 循环它对我不起作用。 请帮我解决这个问题。

Answer 1

我怀疑您正在连接到 Cisco 设备。如果是这样，请在登录到节点时发出 "term len 0"。如果是 juniper，请在每个命令的末尾添加“| no-more”。