我尝试了下面的例子,为什么找不到呢?
#!/usr/bin/perl
use Expect;
my $exp = new Expect;
$exp->expect(10, 'match me exactly', '-re', "match me exactly") or print "Not found\n";一开始,我根据Expect.pm的例子尝试了'match\s+me\s+exactly‘,但它也不起作用。
有什么建议吗?
提前谢谢。
发布于 2013-01-13 15:50:27
您忘了启动您期望匹配其输出的子进程。
https://stackoverflow.com/questions/14301583
复制相似问题