man Proc::WaitStat () - Interpret and act on wait() status values
NAME
Proc::WaitStat - Interpret and act on wait() status values
SYNOPSIS
$description = waitstat $?; exit waitstat_reuse $?; waitstat_die $?, 'program-name'; close_die COMMAND, 'program-name';
DESCRIPTION
This module contains functions for interpreting and acting on wait status values.
Nothing is exported by default.
- waitstat wait-status
- Returns a string representation of wait() status value wait-status. Values returned are like CW"0" and CW"64" and CW"killed (SIGHUP)". This function is prototyped to take a single scalar argument.
- waitstat_reuse wait-status
- Turn wait-status into a value which can be passed to exit, converted in the same manner the shell uses. If wait-status indicates a normal exit, return the exit value. If wait-status instead indicates death by signal, return 128 plus the signal number. This function is prototyped to take a single scalar argument.
- waitstat_die wait-status program-name
- die() if wait-status is non-zero (mentioning program-name as the source of the error). This function is prototyped to take two scalar arguments.
- close_die filehandle name
- Close filehandle, if that fails die() with an appropriate message which refers to name. This handles failed closings of both programs and files properly. This function is prototyped to take a filehandle (actually, a glob ref) and a scalar.
EXAMPLES
close SENDMAIL; exit if $? == 0; log "sendmail failure: ", waitstat $?; exit EX_TEMPFAIL;
$pid == waitpid $pid, 0 or croak "Failed to reap $pid: $!"; exit waitstat_reuse $?;
$output = `some-program -with args`; waitstat_die $?, 'some-program'; print "Output from some-process:\n", $output;
open PROGRAM, '| post-processor' or die "Can't fork: $!"; while (<IN>) { print PROGRAM pre_process $_ or die "Error writing to post-processor: $!"; } # This handles both flush failures at close time and a non-zero exit # from the subprocess. close_die PROGRAM, 'post-processor';
AUTHOR
Roderick Schertler <roderick@argon.org>
SEE ALSO
perl(1), IPC::Signal(3pm).