| blib/lib/Perl/Critic/Statistics.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 24 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 46 | 440 | 2284 | if ($subs) |
| 54 | 2709 | 15 | $statements ? : |
| 63 | 179 | 23127 | if ('=' eq substr($_, 0, 1)) { } |
| 291 | 22836 | elsif ($in_pod) { } | |
| 82 | 22754 | elsif ('__END__' eq $_ or '__DATA__' eq $_) { } | |
| 183 | 22571 | elsif ($in_data) { } | |
| 4168 | 18403 | elsif (/ \A \s* \# /msx) { } | |
| 6189 | 12214 | 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 |