Branch Coverage

lib/Pod/Headings.pm
Criterion Covered Total %
branch 11 12 91.6


line true false branch
27 10 52 unless defined $parser->{'handlers'}{$element_name}
33 10 52 unless scalar @{$parser->{'_elements'};} and $element_name eq do { $$parser{'_elements'} }->[-1]{'heading'}
37 44 8 if (ref $parser->{'handlers'}{$element_name} eq 'CODE') { }
43 52 0 if ($propagate_text)
44 8 44 if (scalar @{$parser->{'_elements'};})
53 56 7 if scalar @{$parser->{'_elements'};}