Branch Coverage

blib/lib/Perl/Critic/Policy/Modules/RequireNoMatchVarsWithUseEnglish.pm
Criterion Covered Total %
branch 3 32 9.3


line true false branch
33 2 55 if $elem->type ne "use"
34 55 0 if $elem->module ne "English"
40 0 0 unless (@elements)
48 0 0 unless (@elements)
55 0 0 if ($current_element->isa('PPI::Token::Quote')) { }
0 0 elsif ($current_element->isa('PPI::Token::QuoteLike::Words')) { }
0 0 elsif (not $current_element->isa('PPI::Token::Operator') or $current_element->content ne $Perl::Critic::Policy::Modules::RequireNoMatchVarsWithUseEnglish::COMMA and $current_element->content ne $Perl::Critic::Policy::Modules::RequireNoMatchVarsWithUseEnglish::FATCOMMA) { }
56 0 0 if $current_element->string eq "-no_match_vars"
59 0 0 if $current_element->content =~ /-no_match_vars \b/msx
82 0 0 if ($current_element->isa('PPI::Token::Number')) { }
0 0 elsif (@{$elements_ref;} >= 2 and $current_element->isa('PPI::Token::Word') and $current_element->content =~ /\A v \d+ \z/msx and $elements_ref->[1]->isa('PPI::Token::Number')) { }
103 0 0 unless @elements
107 0 0 if ($current_element->isa("PPI::Structure::List"))
109 0 0 unless (@grand_children)
115 0 0 if ($grand_child->isa('PPI::Statement::Expression')) { }
118 0 0 unless (@great_grand_children)