Branch Coverage

blib/lib/Perl/Critic/Policy/Variables/ProhibitPackageVars.pm
Criterion Covered Total %
branch 15 24 62.5


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)