line |
true |
false |
branch |
39
|
1 |
299 |
unless $element
|
40
|
1 |
298 |
unless $element->isa("PPI::Statement")
|
41
|
90 |
208 |
if $element->isa("PPI::Statement::Expression")
|
45
|
0 |
208 |
unless $element_class
|
56
|
1 |
64 |
unless $element_class
|
57
|
23 |
41 |
unless $element->isa("PPI::Statement")
|
69
|
1 |
309 |
unless $element_class
|
70
|
1 |
308 |
unless $element->isa("PPI::Statement")
|
89
|
0 |
189 |
unless my $element = shift()
|
91
|
0 |
189 |
unless my $element_class = &blessed($element)
|
99
|
0 |
27 |
unless my $element = shift()
|
101
|
0 |
27 |
unless &blessed($element)
|
122
|
1 |
53 |
unless $element
|
124
|
4 |
49 |
if $element->isa("PPI::Statement::Sub")
|
126
|
4 |
45 |
if (is_ppi_generic_statement($element))
|
129
|
3 |
1 |
if $first_element and $first_element->isa("PPI::Token::Word") and $first_element->content eq "sub"
|
143
|
2 |
13 |
unless $element
|
144
|
0 |
13 |
if is_subroutine_declaration($element)
|
147
|
4 |
31 |
if is_subroutine_declaration($element)
|
163
|
0 |
0 |
unless $element
|
164
|
0 |
0 |
unless $element->isa("PPI::Statement")
|
166
|
0 |
0 |
if ($element->isa('PPI::Statement::Include')) { }
|
|
0 |
0 |
elsif (is_ppi_generic_statement($element) and $element->schild(0)->content =~ / \A Readonly \b /msx) { }
|
168
|
0 |
0 |
if ($pragma = $element->pragma and $pragma eq "constant")
|
185
|
0 |
0 |
unless my(@arguments) = $include->arguments
|
188
|
0 |
0 |
unless defined $follower
|
196
|
0 |
81 |
unless my $element = shift()
|
203
|
81 |
0 |
if $next = $element->snext_sibling
|
213
|
0 |
27 |
unless my $element = shift()
|
215
|
0 |
27 |
unless $element->location
|
218
|
0 |
27 |
unless $element = $element->parent
|
222
|
0 |
27 |
unless $element->location
|
|
27 |
0 |
unless (@{[] unless $element->location;})[0] == $line
|
223
|
0 |
0 |
if $element->isa("PPI::Statement::Include")
|