RE: [Expectperl-discuss] exiting and a spawned process

[Rogaski, M. A. <ro...@at...>]

: -----Original Message-----
: From: James E. Pace [mailto:je...@do...]
: 
: unless ($lrb->expect($Settings::timeout, $Settings::boot_prompt))
: {
:             print STDERR "reboot: No boot prompt found.\n";
:             #exit $Settings::UNDECIDED;
:             exit 2;
: }
:  

Expect.pm doesn't have a destructor that does any cleanup when exit() is
called.  So, there's nothing to reap the little children.  However, it does
provide soft_close() and hard_close() which will do the job.  Since this is
a case where a problem has occurred, you're probably going to want to add a
$lrb->hard_close() before that exit.

Mark

--
[] Mark Rogaski                    "Computers save time like 
[] AT&T Frame Relay Service           kudzu prevents soil erosion"
[] email: ro...@at...                          -- Al Castanoli
[] voice: 732-885-7534 fax: 732-885-7699
[] pager: 888-858-7243 pin 200853 or 20...@pa...