【问题标题】:Perl Net::Telnet sending CTRL+CPerl Net::Telnet 发送 CTRL+C
【发布时间】:2015-01-20 16:08:12
【问题描述】:

我在我的 perl 脚本中使用 Net::Telnet 登录网络设备(华为媒体网关)。 运行命令后,我需要发送“CTRL+C”字符,因为很少有命令输出比当前屏幕尺寸长,并且要打印更多输出,需要点击 键盘上的 CTRL+C。

我尝试搜索网络但没有运气。任何人都知道如何在运行命令后发送此字符。

提前致谢。

问候 马赫什

【问题讨论】:

  • 你看到并尝试this perlmonks node了吗?
  • 即使我还需要在 Net::Ping 模块中发送 CTRL+C,我尝试使用 "\x03"...没有运气:(

标签: perl


【解决方案1】:

您是否尝试过仅发送带有 ascii 代码 3 的字符?

$t->print("\x03");

【讨论】:

  • 我尝试了同样的方法,但没有成功。我使用了下面的行但没有运气我的 @output1=$session->cmd('DSP PATCH:;'); $session->waitfor('/​​按CTRL+C中断,其他键继续.../'); @output1=$session->print("\x03");打印@output1;
【解决方案2】:

我知道这是一篇旧帖子,但由于我没有看到任何人验证任何建议是否有效,我想我会回复。

这对我有用...

print $telnet->cmd("\x03");

【讨论】:

    【解决方案3】:

    谢谢。

    print $telnet->cmd("\x03");
    

    也为我工作。

    【讨论】:

      猜你喜欢
      • 2010-11-07
      • 2011-10-25
      • 2016-08-29
      • 2011-03-02
      • 2011-01-30
      • 2013-04-09
      • 2015-03-01
      • 2012-10-19
      • 2011-06-30
      相关资源
      最近更新 更多