| line |
true |
false |
branch |
|
25
|
0 |
0 |
if exists $opts{'MAX_PROCS'} |
|
26
|
0 |
0 |
if exists $opts{'TIMEOUT'} |
|
27
|
0 |
0 |
if exists $opts{'IPC'} |
|
28
|
0 |
0 |
if exists $opts{'TEMPFILE_DIR'} |
|
33
|
0 |
4 |
ref $_[-1] eq 'CODE' ? : |
|
36
|
0 |
4 |
unless ($IPC) |
|
44
|
0 |
0 |
unless defined $pid |
|
45
|
0 |
0 |
if ($pid == 0) |
|
46
|
0 |
0 |
if ($TIMEOUT) { } |
|
54
|
0 |
0 |
if ($@) |
|
61
|
0 |
0 |
if $cb |
|
71
|
0 |
0 |
if $procs >= $MAX_PROCS or $i > $#args |
|
83
|
0 |
9 |
unless pipe my $r, my $w |
|
86
|
0 |
9 |
unless defined $pid |
|
87
|
3 |
6 |
if ($pid == 0) |
|
90
|
0 |
3 |
if ($TIMEOUT) { } |
|
96
|
0 |
0 |
if defined $t |
|
99
|
0 |
0 |
if ($@) |
|
100
|
0 |
0 |
if defined fileno $fh |
|
101
|
0 |
0 |
if defined $fname |
|
108
|
3 |
0 |
if defined $t |
|
110
|
0 |
3 |
if ($@) |
|
111
|
0 |
0 |
if defined fileno $fh |
|
112
|
0 |
0 |
if defined $fname |
|
129
|
3 |
3 |
if (defined $line) { } |
|
132
|
0 |
3 |
unless (open my $f, "<", $fname) |
|
141
|
0 |
3 |
if ($cb) { } |
|
156
|
0 |
1 |
$cb ? : |