| blib/lib/Pod/Sub/Usage.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 54 | 0 | 3 | unless $sub |
| 69 | 0 | 6 | unless open my $fh, '<:encoding(UTF-8)', $file |
| 74 | 6 | 162 | if $row =~ /^=cut/ and $found |
| 75 | 6 | 156 | if ($row =~ /$rex_start_head/) |
| 79 | 18 | 138 | if ($found) |
| 85 | 0 | 6 | unless $found |