Branch Coverage

blib/lib/Perl/Critic/Policy/OTRS/RequireCamelCase.pm
Criterion Covered Total %
branch 14 22 63.6


line true false branch
37 0 13 unless $sub
41 8 5 if $success
51 1 4 if ($elem->isa('PPI::Statement::Sub') and $name eq 'new') { }
0 4 elsif ($elem->isa('PPI::Statement::Package') and $name eq 'main') { }
2 2 elsif ($elem->isa('PPI::Statement::Package') and $name =~ / \A t:: /x) { }
0 4 elsif ($elem->isa('PPI::Statement::Package') and $name =~ / Language :: [a-z]{2,3}_ /msx) { }
64 0 2 unless $name
77 0 8 if $name eq '$a'
78 0 8 if $name eq '$b'
81 0 8 if substr($name, 0, 1) eq '&'
84 0 8 if length $name == 2