| blib/lib/Perl/Critic/Policy/TestingAndDebugging/ProhibitNoStrict.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 3 | 12 | 25.0 |
| line | true | false | branch |
|---|---|---|---|
| 44 | 2 | 86 | if (defined $config_string) |
| 58 | 63 | 0 | if $elem->type ne "no" |
| 59 | 0 | 0 | if $elem->pragma ne "strict" |
| 72 | 0 | 0 | unless $stmnt |
| 74 | 0 | 0 | if $_ ne "qw" and $_ ne "no" |
| 75 | 0 | 0 | if @words and &all(sub { |