| blib/lib/Perl/Critic/Statistics.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 24 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 46 | 9 | 75 | if ($subs) |
| 54 | 82 | 2 | $statements ? : |
| 63 | 64 | 1120 | if ('=' eq substr($_, 0, 1)) { } |
| 99 | 1021 | elsif ($in_pod) { } | |
| 59 | 962 | elsif ('__END__' eq $_ or '__DATA__' eq $_) { } | |
| 89 | 873 | elsif ($in_data) { } | |
| 91 | 782 | elsif (/ \A \s* \# /msx) { } | |
| 228 | 554 | elsif (/ \A \s* \z /msx) { } | |
| 209 | 0 | 1 | if $self->subs == 0 |
| 219 | 0 | 1 | if $self->modules == 0 |
| 231 | 0 | 1 | if $statements == 0 |
| 241 | 0 | 1 | if $self->lines == 0 |