1

我尝试了以下示例,为什么找不到?

#!/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',但它也不起作用。

有什么建议么?

提前致谢。

4

1 回答 1

3

您忘记启动您期望其输出匹配的孩子。

于 2013-01-13T07:50:27.423 回答