line |
true |
false |
branch |
66
|
203 |
43 |
unless ($elem->isa('PPI::Token::Word'))
|
70
|
11 |
32 |
if (exists $$constants{$elem->content})
|
73
|
1 |
31 |
if (is_perl_builtin_with_no_arguments($elem))
|
76
|
3 |
28 |
if (is_method_call($elem))
|
79
|
7 |
21 |
if (is_included_module_name($elem))
|
83
|
0 |
21 |
unless my $lt = $elem->snext_sibling
|
84
|
11 |
10 |
unless $lt->isa('PPI::Token::Operator')
|
85
|
4 |
6 |
unless $lt->content eq '<'
|
92
|
5 |
11 |
unless $after = $after->snext_sibling
|
93
|
1 |
10 |
if ($after->content eq '>')
|
114
|
10 |
519 |
if ($elem->isa('PPI::Statement::Sub'))
|
117
|
4 |
6 |
if (defined $prototype and $prototype eq '')
|
118
|
4 |
0 |
if (my $name = $elem->name)
|
128
|
2 |
30 |
unless $elem->isa('PPI::Statement::Include') and $elem->type eq 'use' and $constant_modules{$elem->module or ''}
|
130
|
1 |
29 |
unless $elem = $elem->schild(2)
|
134
|
8 |
21 |
if ($elem->isa('PPI::Structure::Constructor')) { }
|
|
4 |
17 |
elsif ($elem->isa('PPI::Structure::List')) { }
|
143
|
2 |
6 |
unless $elem = $elem->schild(0)
|
154
|
2 |
2 |
unless $elem = $elem->schild(0)
|
158
|
8 |
0 |
if ($elem->isa('PPI::Statement'))
|
159
|
0 |
8 |
unless $elem = $elem->schild(0)
|
170
|
19 |
6 |
if ($single)
|
176
|
30 |
0 |
if (@$aref == 1)
|
178
|
29 |
1 |
unless ($name_elem->isa('PPI::Token::Structure'))
|
179
|
2 |
27 |
$name_elem->can('string') ? :
|