| blib/lib/Perl/Lint/Policy/TestingAndDebugging/ProhibitNoStrict.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 15 | 73.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 29 | 30 | 0 | 10 | $token_type == 70 and $token->{'data'} eq 'no' |
| 33 | 0 | 0 | 10 | $token->{'type'} == 122 and $token->{'data'} eq 'strict' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 38 | 8 | 5 | 30 | $token_type == 172 or $token_type == 173 |
| 10 | 0 | 17 | $token_type == 106 or not $$tokens[$i + 1] | |
| 48 | 4 | 3 | 3 | not @arg_allows or @allows |