Perl Net :: Telnet waitfor（）十六进制字符

Question

所以我在Perl中使用Net :: Telnet编写脚本...我想等待（）并匹配十六进制字符01（Ctrl + A）和03（Ctrl + C）以及它们之间的所有内容

如何实现这样的壮举？

Answer 1

最好是等待非ctrl字符（如果你可以从显示这个ctrl char的终端抛出一些输出它会有帮助），

你可以使用从waitfor调用返回的prematch和match来读取所有缓冲区，waitfor调用应该包含所有打印的字符。简单的技巧是使$ match匹配，然后将所有内容放入$ prematch。