blib/lib/Perl/Critic/Policy/Subroutines/ProhibitUnusedPrivateSubroutines.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 21 | 35 | 60.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
166 | 3 | 0 | 0 | _compare_token_locations($regexp, $start_token) >= 0 and _compare_token_locations($finish_token, $regexp) >= 0 |
260 | 1 | 2 | 2 | $prior and $prior->isa("PPI::Token::Cast") |
3 | 0 | 2 | $prior and $prior->isa("PPI::Token::Cast") and "\\" eq $prior->content | |
265 | 0 | 0 | 1 | $prior and $prior->isa("PPI::Token::Word") |
0 | 0 | 1 | $prior and $prior->isa("PPI::Token::Word") and "goto" eq $prior->content | |
304 | 6 | 0 | 4 | $element->isa("PPI::Token::Operator") and $IS_COMMA{$element->content} |
line | l | !l | condition |
---|---|---|---|
308 | 0 | 6 | $elements[$inx] ||= [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
73 | 7 | 111 | 112 | $config_string //= $parameter->get_default_string |
138 | 20 | 0 | 0 | $left_loc->[0] <=> $right_loc->[0] || $left_loc->[1] <=> $right_loc->[1] |
154 | 4 | 3 | 21 | is_function_call($usage) or is_method_call($usage) |
203 | 3 | 0 | 0 | is_function_call($word) or is_method_call($word) |
265 | 2 | 1 | 0 | is_function_call($usage) or $prior and $prior->isa("PPI::Token::Word") and "goto" eq $prior->content |