line |
true |
false |
branch |
44
|
233 |
135 |
if is_ppi_statement_subclass($elem)
|
49
|
14 |
121 |
if _is_parent_a_constructor_or_list($elem)
|
50
|
0 |
121 |
if _is_parent_a_for_loop($elem)
|
52
|
2 |
119 |
if ($self->{'_allow_last_statement_to_be_comma_separated_in_map_and_grep'})
|
55
|
1 |
1 |
unless _is_direct_part_of_map_or_grep_block($elem)
|
59
|
376 |
0 |
unless ($self->{'_allow_last_statement_to_be_comma_separated_in_map_and_grep'} or _is_last_statement_in_a_block($child))
|
63
|
62 |
314 |
if ($child->isa('PPI::Token::Word')) { }
|
|
77 |
237 |
elsif ($child->isa('PPI::Token::Operator')) { }
|
64
|
25 |
37 |
if _succeeding_commas_are_list_element_separators($child)
|
67
|
17 |
60 |
if ($child->content eq $Perl::Critic::Policy::ValuesAndExpressions::ProhibitCommaSeparatedStatements::COMMA)
|
82
|
0 |
135 |
unless $parent
|
95
|
0 |
121 |
unless $parent
|
97
|
112 |
9 |
unless $parent->isa("PPI::Structure::For")
|
106
|
0 |
2 |
unless $parent
|
107
|
1 |
1 |
unless $parent->isa("PPI::Structure::Block")
|
110
|
0 |
1 |
unless $block_prior_sibling
|
111
|
0 |
1 |
unless $block_prior_sibling->isa("PPI::Token::Word")
|
120
|
0 |
376 |
unless $parent
|
121
|
376 |
0 |
unless $parent->isa("PPI::Structure::Block")
|
124
|
0 |
0 |
unless $next_sibling
|
132
|
16 |
46 |
if (is_perl_builtin_with_zero_and_or_one_arguments($elem) and not is_perl_builtin_with_multiple_arguments($elem))
|
141
|
0 |
46 |
unless $sibling
|