| blib/lib/BGS.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 22 | 45.4 |
| line | true | false | branch |
|---|---|---|---|
| 30 | 0 | 14 | unless pipe my $from_kid_fh, my $to_parent_fh |
| 33 | 0 | 14 | unless defined $kid_pid |
| 36 | 9 | 5 | if ($kid_pid) { } |
| 62 | 6 | 6 | if ($len) { } |
| 6 | 0 | elsif (defined $len) { } | |
| 66 | 0 | 6 | unless close $fh |
| 68 | 6 | 0 | if (exists $from_kid{$fh}) { } |
| 79 | 5 | 0 | if ($vpid) |
| 94 | 0 | 0 | unless my $fh = $vpid2fh{$vpid} |
| 108 | 0 | 0 | if (defined $vpid) { } |
| 109 | 0 | 0 | if (my $pid = $vpid2pid{$vpid}) |