blib/lib/Perl/Lint/Policy/ControlStructures/ProhibitDeepNests.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 13 | 14 | 92.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
49 | 251 | 1 | 1 | $token_type == 70 and $token_data eq 'eval' |
line | l | !l | condition |
---|---|---|---|
15 | 1 | 11 | $args->{'prohibit_deep_nests'}{'max_nests'} || 5 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
49 | 36 | 57 | 254 | $token_type == 166 or $token_type == 194 |
93 | 1 | 253 | $token_type == 166 or $token_type == 194 or $token_type == 63 | |
58 | 0 | 253 | $token_type == 166 or $token_type == 194 or $token_type == 63 or $token_type == 70 and $token_data eq 'eval' |