Branch Coverage

blib/lib/Perl/Critic/Policy/Modules/ProhibitConditionalUseStatements.pm
Criterion Covered Total %
branch 25 26 96.1


line true false branch
33 22 7 if $elem->type eq "use" and not $elem->pragma and $elem->module and $self->_is_in_conditional_logic($elem)
46 27 6 unless $elem->isa("PPI::Statement")
48 1 5 if $first_elem->isa("PPI::Token::Word") and $first_elem eq "eval"
59 5 27 unless $elem->isa("PPI::Structure::Block")
60 1 26 unless my $prev_sibling = $elem->sprevious_sibling
61 11 15 if ($prev_sibling->isa("PPI::Token::Word") and $prev_sibling eq "do")
63 6 5 if $next_sibling and $next_sibling->isa("PPI::Token::Word")
65 1 4 unless $prev_sibling = $prev_sibling->sprevious_sibling
67 4 0 if $prev_sibling->isa("PPI::Token::Operator") and $OPS{$prev_sibling->content}
78 31 13 unless $elem->isa("PPI::Statement::Compound")
79 11 2 if $elem->type ne "continue"
90 7 44 if $elem->isa("PPI::Document")
91 11 22 if $self->_is_compound_statement($elem) or $self->_is_eval($elem) or $self->_is_in_do_conditional_block($elem)