Branch Coverage

blib/lib/PPI/Prettify.pm
Criterion Covered Total %
branch 28 48 58.3


line true false branch
74 1 0 unless exists $$args{'code'} and defined $$args{'code'}
77 0 0 unless $doc or $@
181 0 0 if $debug
192 15 6 if (ref $token eq 'PPI::Token::Word')
193 1 14 if ($token->snext_sibling and $token->snext_sibling->content eq '=>')
199 3 11 if ($parent->isa('PPI::Statement::Include')) { }
0 11 elsif ($parent->isa('PPI::Statement::Variable')) { }
0 11 elsif ($parent->isa('PPI::Statement::Compound')) { }
0 11 elsif ($parent->isa('PPI::Statement::Given')) { }
0 11 elsif ($parent->isa('PPI::Statement::When')) { }
1 10 elsif ($parent->isa('PPI::Statement::Scheduled')) { }
200 2 1 if $content eq $parent->pragma
203 0 0 if ($content =~ /^(?:my|local|our)$/)
208 0 0 if ($content =~ /^(?:if|else|elsif|unless|for|foreach|while|my)$/)
214 0 0 if ($content eq 'given')
219 0 0 if ($content =~ /^(?:when|default)$/)
226 1 10 if is_method_call($token)
227 0 10 if is_subroutine_name($token)
228 2 8 if grep /^$token$/, @B::Keywords::Barewords
230 1 7 if grep /^$token$/, @B::Keywords::Filehandles
232 1 6 if is_package_declaration($token)
235 6 0 if ($token->next_token)
240 1 5 if $next_token->content eq '}' and not $token->sprevious_sibling
243 5 0 if grep /^$token$/, @B::Keywords::Functions