eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}' & eval 'exec perl -S $0 $argv:q' if 0; # $Id$ # -*- perl -*- unshift @INC, '../../../../bin'; require ACEutils; $TEST = Process::Create ($EXEPREFIX."FindPOA$EXE_EXT",""); if ($TEST->TimedWait (60) == -1){ print STDERR "ERROR: test timedout\n"; $TEST->Kill (); $TEST->TimedWait(1); exit 1; } exit 0;