| blib/lib/Perl/Critic/Statistics.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 24 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 46 | 9 | 76 | if ($subs) |
| 54 | 83 | 2 | $statements ? : |
| 63 | 64 | 1121 | if ('=' eq substr($_, 0, 1)) { } |
| 99 | 1022 | elsif ($in_pod) { } | |
| 59 | 963 | elsif ('__END__' eq $_ or '__DATA__' eq $_) { } | |
| 89 | 874 | elsif ($in_data) { } | |
| 91 | 783 | elsif (/ \A \s* \# /msx) { } | |
| 228 | 555 | 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 |