HTTP/2 200 cache-control: max-age=43200 server: Combust/Plack (Perl) vary: Accept-Encoding content-encoding: gzip content-length: 1183 content-type: text/html; charset=utf-8 last-modified: Sat, 11 Oct 2025 23:02:48 GMT date: Sat, 11 Oct 2025 23:02:48 GMT strict-transport-security: max-age=15768000 Front page | perl.perl5.porters | Postings from July 2008

[PATCH - revised^3] test.pl fix

The attached patch makes the following updates to test.pl:
1.  Don't executing the END block (installed by test.pl) in the
watchdog process.
2.  The cleanup of the watchdog process needs a wait().  (This was
causing spurious test failures.)
3.  Use which_perl() throughout test.pl (namely _create_runperl() and
watchdog()).
Revision localizes $? before calling wait().
Revision^2 properly escapes the $? in the eval string.
Revision^3 moved $Perl to top of file

• [PATCH - revised^3] test.pl fix by Jerry D. Hedden