Branch Coverage

blib/lib/Perl/Lint/Policy/BuiltinFunctions/ProhibitBooleanGrep.pm
Criterion Covered Total %
branch 26 28 92.8


line true false branch
22 4 297 if ($token_type == 96 or $token_type == 99 or $token_type == 132 or $token_type == 100)
30 6 4 if ($token_type == 107) { }
4 0 elsif ($token_type == 70 and $token->{'data'} eq 'grep') { }
37 1 58 if ($token_type == 31) { }
5 53 elsif ($token_type == 107) { }
11 42 elsif ($token_type == 108) { }
6 72 elsif ($token_type == 70 and $token->{'data'} eq 'grep') { }
44 6 5 if (--$left_paren_num <= 0)
45 5 1 if ($is_grep_called and not $is_in_numeric_comparison_context)
75 19 278 if ($token_type == 70 and $token->{'data'} eq 'grep')
79 0 285 if ($token_type == 53 or $token_type == 52 or $token_type == 14 or $token_type == 16)
88 1 296 if ($token_type == 31)
92 32 265 if ($token_type == 106)
93 10 6 if ($is_grep_called and $is_in_boolean_context and not $is_in_numeric_comparison_context)