[Expectperl-discuss] Strange time out and hard close

[<ex...@ih...>]

The spawned program is an sh script.  The timeout comes only after
a few seconds at one point when the script is doing work.
Why is it timing out?  Is something strange happening to
$end_time?

Here's the bit of code from Expect.pm that gets me
to this point:

1329:    if (($end_time <= time()) && ${*$self}{exp_Debug}) {
1330:      print STDERR "Timed out waiting for an EOF from ${*$self}{exp_Pty_Handle}.\r\n";
1331:    }

Can anyone provide any clues? 

Timed out waiting for an EOF from spawn id(7).
spawn id(7) closed.
Pid 17299 of spawn id(7) exited, Status: 0x01
Closing spawn id(7).
        Expect::hard_close('Expect=GLOB(0x39e25c)') called at /usr/perl/lib/site_perl/5.6.1/Expect.pm line 1577
        Expect::DESTROY('Expect=GLOB(0x39e25c)') called at /tmp/inst.pl line 0
        eval {...} called at /tmp/inst.pl line 0