| line |
true |
false |
branch |
|
63
|
107 |
298 |
if exists $ALLOW{$elem}
|
|
64
|
176 |
122 |
unless is_perl_builtin($elem)
|
|
65
|
7 |
115 |
unless is_function_call($elem)
|
|
68
|
1 |
114 |
unless $sibling
|
|
69
|
35 |
79 |
if ($sibling->isa("PPI::Structure::List"))
|
|
72
|
5 |
30 |
if _is_named_unary_with_operator_inside_parens_exemption($elem, $sibling)
|
|
73
|
10 |
20 |
if _is_named_unary_with_operator_following_parens_exemption($elem, $elem_after_parens)
|
|
74
|
9 |
11 |
if _is_precedence_exemption($elem_after_parens)
|
|
75
|
1 |
10 |
if _is_equals_exemption($sibling)
|
|
76
|
2 |
8 |
if _is_sort_exemption($elem, $sibling)
|
|
92
|
12 |
18 |
if (_is_named_unary($elem) and $elem_after_parens)
|
|
95
|
10 |
2 |
if defined $precedence and $precedence < $PRECENDENCE_OF_LIST
|
|
116
|
17 |
3 |
if ($elem_after_parens)
|
|
119
|
9 |
8 |
if defined $precedence and $precedence <= $PRECEDENCE_OF_COMMA
|
|
132
|
5 |
6 |
if (my $first_op = $sibling->find_first("PPI::Token::Operator"))
|
|
133
|
1 |
4 |
if $first_op eq "="
|
|
146
|
2 |
8 |
if ($elem eq "sort")
|
|
148
|
2 |
0 |
if ($first_arg and $first_arg->isa("PPI::Statement::Expression"))
|
|
151
|
2 |
0 |
if ($first_arg and $first_arg->isa("PPI::Token::Word"))
|
|
153
|
2 |
0 |
if $next_arg and $next_arg->isa("PPI::Structure::List")
|
|
172
|
5 |
13 |
if $parens->find_first("PPI::Token::Operator")
|