Branch Coverage

blib/lib/Perl/Critic/Community/Utils.pm
Criterion Covered Total %
branch 10 14 71.4


line true false branch
18 0 38 unless &blessed($elem) and $elem->isa("PPI::Token::Word") and $elem eq "return"
22 5 31 if $next->isa("PPI::Token::Structure") and $next eq ";"
23 8 2 if $next->isa("PPI::Token::Word") and exists $modifiers{$next}
30 0 10 unless &blessed($elem) and $elem->isa("PPI::Structure::Block")
33 10 0 if (my $parent = $elem->parent)
34 9 1 if ($parent->isa("PPI::Statement::Compound") and my $first = $parent->schild(0))
35 9 0 if $first->isa("PPI::Token::Word") and exists $compound{$first}