Condition Coverage

blib/lib/Perl/Critic/Policy/Subroutines/ProtectPrivateSubs.pm
Criterion Covered Total %
condition 14 15 93.3


and 3 conditions

line !l l&&!r l&&r condition
143 201 43 6 $content =~ / \w+::$private_name_regex \z /msx && !($content =~ / \A SUPER::$private_name_regex \z /msx) && !$self->{'_allow'}{$content}

or 3 conditions

line l !l&&r !l&&!r condition
95 4 96 0 $config_string //= $parameter->get_default_string
123 6 6 320 $self->_is_other_pkg_private_function($elem) or $self->_is_other_pkg_private_method($elem)
136 21 229 82 is_method_call($elem) or is_function_call($elem)
163 2 1 8 $package->content eq "shift" or $package->content eq "__PACKAGE__"