| blib/lib/Perl/Critic/Policy/TestingAndDebugging/ProhibitNoWarnings.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 3 | 14 | 21.4 |
| line | true | false | branch |
|---|---|---|---|
| 52 | 2 | 87 | if (defined $config_string) |
| 68 | 61 | 0 | if $elem->type ne "no" |
| 69 | 0 | 0 | if $elem->pragma ne "warnings" |
| 72 | 0 | 0 | unless @words >= 2 and "no" eq $words[0] and "warnings" eq $words[1] |
| 79 | 0 | 0 | if $self->{'_allow_with_category_restriction'} and @words |
| 80 | 0 | 0 | if @words and &all(sub { |
| 113 | 0 | 0 | unless $child->isa($hdlr->[0]) |