| inc/IPC/Run3.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 20 | 67 | 29.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 286 | 8 | 0 | 0 | $type eq 'SCALAR' and $dest == \(undef) |
| 326 | 0 | 0 | 0 | $type eq 'SCALAR' and $dest == \(undef) |
| 404 | 0 | 8 | 0 | @_ && ref $_[-1] eq 'HASH' |
| 444 | 0 | 0 | 8 | defined $stderr && defined $stdout && $stderr eq $stdout |
| 503 | 0 | 0 | 8 | defined $r and $r != -1 |
| 537 | 0 | 8 | 0 | defined $out_fh and $out_type |
| 8 | 0 | 0 | defined $out_fh and $out_type and $out_type ne 'FH' | |
| 539 | 0 | 8 | 0 | defined $err_fh and $err_type |
| 8 | 0 | 0 | defined $err_fh and $err_type and $err_type ne 'FH' | |
| 8 | 0 | 0 | defined $err_fh and $err_type and $err_type ne 'FH' and not $tie_err_to_out |
| line | l | !l | condition | |
|---|---|---|---|---|
| 147 | 0 | 2 | $ENV{'IPCRUN3DEBUG'} || $ENV{'IPCRUNDEBUG'} || 0 | |
| 148 | 0 | 2 | $ENV{'IPCRUN3PROFILE'} || $ENV{'IPCRUNPROFILE'} || 0 | |
| 461 | 8 | 0 | 0 | open STDOUT_SAVE, '>&STDOUT' or croak("run3(): $! saving STDOUT") |
| 463 | 8 | 0 | 0 | open STDERR_SAVE, '>&STDERR' or croak("run3(): $! saving STDERR") |
| 470 | 8 | 0 | 0 | dup2(fileno $in_fh, 0) or croak("run3(): $! redirecting STDIN") |
| 478 | 8 | 0 | 0 | open STDOUT, '>&' . fileno($out_fh) or croak("run3(): $! redirecting STDOUT") |
| 482 | 8 | 0 | 0 | open STDERR, '>&' . fileno($err_fh) or croak("run3(): $! redirecting STDERR") |
| 528 | 8 | 0 | 0 | open STDOUT, '>&STDOUT_SAVE' or push @errs, "run3(): $! restoring STDOUT" |
| 530 | 8 | 0 | 0 | open STDERR, '>&STDERR_SAVE' or push @errs, "run3(): $! restoring STDERR" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 225 | 4 | 1 | 0 | $fh_cache{'in'} ||= tempfile() |
| 272 | 0 | 0 | 0 | seek $fh, 0, 0 or croak("$! seeking on temp file for child's stdin") |
| 290 | 0 | 0 | 0 | $fh_cache{'nul'} ||= do { local *FH; open FH, '>' . 'File::Spec'->devnull; *FH{'IO'} } |
| 310 | 0 | 0 | 0 | $fh_cache{$what} ||= tempfile() |