2011-09-07 78 views
2

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

我试着搜索网络,但没有运气。任何人一旦运行命令就知道如何发送这个字符。

在此先感谢。

问候 马赫什

+1

您是否看到并尝试[this perlmonks node](http://www.perlmonks.org/?node_id=359752)? – Konerak

+0

即使我也需要在Net :: Ping模块中发送CTRL + C,我尝试过使用“\ x03”...没有运气:( –

回答

1

你试过只发送字符与ASCII码3?

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

我尝试过,但没有工作。 @ output1 = $ session-> cmd('DSP PATCH :;'); $ session-> waitfor('/按CTRL + C打破,其他键继续... /'); @ output1 = $ session - > print(“\ x03”); print @ output1; – Mahesh

0

我知道这是一个古老的职位,但因为我还没有看到任何人验证任何建议的工作,我想我会回答。

这个工作对我来说...

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

日Thnx。

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

工作对我来说也是如此。