Branch Coverage

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


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)