line |
true |
false |
branch |
65
|
0 |
313 |
if ($self->_is_package_var($elem) or _is_our_var($elem) or _is_vars_pragma($elem))
|
81
|
142 |
172 |
unless $elem->isa("PPI::Token::Symbol")
|
83
|
171 |
1 |
unless defined $package
|
84
|
0 |
1 |
if _all_upcase($name)
|
85
|
0 |
1 |
if $self->{'_all_packages'}{$package}
|
93
|
228 |
85 |
unless $elem->isa("PPI::Statement::Variable")
|
94
|
58 |
27 |
if $elem->type ne "our"
|
95
|
27 |
0 |
if _all_upcase($elem->variables)
|
103
|
256 |
57 |
unless $elem->isa("PPI::Statement::Include")
|
104
|
57 |
0 |
if $elem->pragma ne "vars"
|
114
|
0 |
0 |
unless @varnames
|
115
|
0 |
0 |
if _all_upcase(@varnames)
|