ecpect的问题 急！！！

lilyhit

我想用expect模块交互式的读取另一个进程的输出，但是我只想读取其中的一部分，怎么办？例如：输出为：（而且输出是有时间间隔的）
.......
begin
1
input is 1
right
2
input is2
right
3
input is3
right
....
100
input is 100
right

想用正则表达式匹配多行，而且是循环的，expect（$timeout，-re=>'/is $_$/m')对吗？
没试验成功，请各位高手指教一下！

lilyhit

实验了下 用foreach（..）{
$exp-> expect($timeout,[qr/input is $_/m]);
}
就可以了