| blib/lib/Sub/Info.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 14 | 78.5 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 8 | unless ref $sub eq 'CODE' |
| 27 | 16 | 42 | if $op->can('line') |
| 28 | 8 | 50 | unless $op->can('next') |
| 33 | 8 | 0 | if (@all_lines) |
| 39 | 4 | 4 | if ($start < $end) |
| 40 | 2 | 0 | unless $start <= 1 or $in{$start} |
| 41 | 2 | 2 | unless $in{$end} |