Branch Coverage

blib/lib/Perl/Critic/Policy/ControlStructures/ProhibitMultipleSubscripts.pm
Criterion Covered Total %
branch 46 56 82.1


line true false branch
16 6 15 if $elem->type ne 'foreach'
20 15 120 if $s_elem->isa('PPI::Structure::Block')
23 0 15 unless $block
27 15 60 if $s_elem->isa('PPI::Token::Symbol')
28 0 60 if $s_elem->isa('PPI::Structure::List')
30 0 15 unless $iterator
33 1 14 unless $subscripts_ref
38 48 12 if ($source->isa('PPI::Token::Operator') and $source eq '->')
41 1 0 unless $source->isa('PPI::Token::Symbol') or $source->isa('PPI::Token::Word')
45 0 59 if _eq_symbol($source, '$_')
48 2 57 if _is_delete_arg($source)
53 2 59 if $sub_value eq '$_'
55 3 9 unless $source_is_iterator or $sub_value eq $iterator
59 10 46 if ($used_cnt and $used_cnt > 2)
73 0 116 unless $elem->isa('PPI::Token::Symbol')
81 0 57 unless @children
83 53 4 if (@children == 1)
85 1 52 if $child->isa('PPI::Token::QuoteLike::Words')
91 5 12 if $child->isa('PPI::Token::Whitespace')
92 3 9 if ($child->isa('PPI::Token::Operator') and $child eq ',')
96 7 2 $child->isa('PPI::Token::Quote') ? :
0 9 $child->isa('PPI::Token::QuoteLike::Words') ? :
101 2 7 ref $_ ? :
108 40 19 unless ($maybe_del)
110 0 40 unless $expr and $expr->isa('PPI::Statement')
112 26 14 unless $parens and $parens->isa('PPI::Structure::List')
117 0 33 unless $maybe_del
118 13 20 unless $maybe_del->isa('PPI::Token::Word')