line |
true |
false |
branch |
65
|
9 |
367 |
if ($self->_is_package_var($elem) or _is_our_var($elem) or _is_vars_pragma($elem))
|
81
|
168 |
221 |
unless $elem->isa("PPI::Token::Symbol")
|
83
|
194 |
27 |
unless defined $package
|
84
|
6 |
21 |
if _all_upcase($name)
|
85
|
8 |
13 |
if $self->{'_all_packages'}{$package}
|
93
|
280 |
96 |
unless $elem->isa("PPI::Statement::Variable")
|
94
|
62 |
34 |
if $elem->type ne "our"
|
95
|
31 |
3 |
if _all_upcase($elem->variables)
|
103
|
301 |
72 |
unless $elem->isa("PPI::Statement::Include")
|
104
|
63 |
9 |
if $elem->pragma ne "vars"
|
114
|
1 |
8 |
unless @varnames
|
115
|
2 |
6 |
if _all_upcase(@varnames)
|