Branch Coverage

blib/lib/Perl/Critic/Policy/ValuesAndExpressions/ConstantBeforeLt.pm
Criterion Covered Total %
branch 45 50 90.0


line true false branch
66 203 43 unless ($elem->isa('PPI::Token::Word'))
70 11 32 if (exists $$constants{$elem->content})
73 1 31 if (is_perl_builtin_with_no_arguments($elem))
76 3 28 if (is_method_call($elem))
79 7 21 if (is_included_module_name($elem))
83 0 21 unless my $lt = $elem->snext_sibling
84 11 10 unless $lt->isa('PPI::Token::Operator')
85 4 6 unless $lt->content eq '<'
92 5 11 unless $after = $after->snext_sibling
93 1 10 if ($after->content eq '>')
114 10 519 if ($elem->isa('PPI::Statement::Sub'))
117 4 6 if (defined $prototype and $prototype eq '')
118 4 0 if (my $name = $elem->name)
128 2 30 unless $elem->isa('PPI::Statement::Include') and $elem->type eq 'use' and $constant_modules{$elem->module or ''}
130 1 29 unless $elem = $elem->schild(2)
134 8 21 if ($elem->isa('PPI::Structure::Constructor')) { }
4 17 elsif ($elem->isa('PPI::Structure::List')) { }
143 2 6 unless $elem = $elem->schild(0)
154 2 2 unless $elem = $elem->schild(0)
158 8 0 if ($elem->isa('PPI::Statement'))
159 0 8 unless $elem = $elem->schild(0)
170 19 6 if ($single)
176 30 0 if (@$aref == 1)
178 29 1 unless ($name_elem->isa('PPI::Token::Structure'))
179 2 27 $name_elem->can('string') ? :