我尝试了以下示例,为什么找不到它?
#!/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 +'',但它 也没用。
有什么建议吗?
提前致谢。
答案 0 :(得分:3)
您忘记启动您希望匹配其输出的孩子。