| line |
true |
false |
branch |
|
35
|
0 |
20 |
unless pipe my $from_kid_fh, my $to_parent_fh |
|
38
|
0 |
20 |
unless defined $kid_pid |
|
40
|
13 |
7 |
if ($kid_pid) { } |
|
67
|
14 |
6 |
if $callback |
|
69
|
0 |
20 |
if ($limit > 0 and keys %fh2data >= $limit) { } |
|
99
|
10 |
9 |
if ($len) { } |
|
|
9 |
0 |
elsif (defined $len) { } |
|
103
|
0 |
9 |
unless close $fh |
|
109
|
9 |
0 |
if (exists $data->{'from_kid'}) { } |
|
112
|
6 |
3 |
if ($callback) { } |
|
118
|
0 |
0 |
if ($callback) { } |
|
129
|
0 |
8 |
if (my $call = shift @to_call) |
|
133
|
3 |
5 |
if ($waited and $waited == $vpid) |
|
149
|
0 |
1 |
unless my $fh = $data->{'fh'} |
|
158
|
1 |
0 |
if (defined $vpid) { } |
|
160
|
0 |
1 |
unless defined $data |
|
161
|
1 |
0 |
if (my $pid = $data->{'pid'}) |