Select Code to Download

    my $job_id = new_job_id();
    $SIG{ CHLD } = 'IGNORE';
...
    }

    exit;

open (ERROR, ">&STDERR");
printf STDERR "fileno( STDERR ): %d\n", fileno( STDERR );
printf STDERR "fileno( ERROR ): %d\n", fileno( ERROR );

fileno( STDERR ): 2
fileno( ERROR ): 6

use Parse::RecDescent;

...
closing 6
no luck with lsoftest     14113 yt    7r  FIFO    0,6           891817
+71 pipe
Nya, nya!  I'm still open!