Re: [Expectperl-discuss] perl expect regex problem

[Bryan B. <br...@bu...>]

> I inserted a "sleep 1; " before the $k->after();  this appears to work,
> but I'd rathernot start introducing sleeps into the code.
>

I use "sleep" in alot of my code, sometimes i think its unavoidable. 
Instead of sleep 1; try using select with a timeout of a quarter second:

  select (undef, undef, undef, 0.25);

Or a half second:

  select (undef, undef, undef, 0.50);

Much less time, and produces the same result.


Hope that helps,

Bryan Bueter
http://sourceforge.net/projects/rover