| blib/lib/Pipe.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 20 | 85.0 |
| line | true | false | branch |
|---|---|---|---|
| 14 | 1548 | 6 | unless $DEBUG |
| 16 | 6 | 0 | unless $class |
| 18 | 0 | 6 | unless open my $fh, '>>', 'pipe.log' |
| 36 | 1 | 52 | if $@ |
| 38 | 27 | 25 | if ($self eq 'Pipe') |
| 58 | 0 | 26 | unless @{$$self{'Pipe'};} |
| 67 | 51 | 202 | unless (@res) |
| 77 | 92 | 88 | unless @res |
| 80 | 51 | 202 | if ($in_finished) |
| 83 | 26 | 25 | unless defined $in |