Branch Coverage

blib/lib/Pod/Dsr.pm
Criterion Covered Total %
branch 0 180 0.0


line true false branch
188 0 0 if (defined $$self{$_}) { }
189 0 0 if (length $$self{$_} < 1 or length $$self{$_} > 2)
221 0 0 unless defined $$self{'center'}
223 0 0 unless defined $$self{'indent'}
229 0 0 unless (defined $$self{'release'})
244 0 0 if ($$self{'quotes'} eq 'none') { }
0 0 elsif (length $$self{'quotes'} == 1) { }
0 0 elsif ($$self{'quotes'} =~ /^(.)(.)$/ or $$self{'quotes'} =~ /^(..)(..)$/) { }
277 0 0 unless (defined $name)
279 0 0 if not $$self{'section'} and $name =~ /\.pm\z/i
281 0 0 if ($section =~ /^1/) { }
293 0 0 if (s[^.*?/lib/[^/]*perl[^/]*/][]is or s[^.*?/[^/]*perl[^/]*/(?:lib/)?][]is)
307 0 0 if $name =~ /\s/
313 0 0 unless (defined $$self{'date'})
345 0 0 if ($chapter =~ /\d/)
373 0 0 if $command eq 'pod'
374 0 0 if $$self{'EXCLUDE'} and $command ne 'end'
375 0 0 if ($self->can('cmd_' . $command)) { }
383 0 0 if $text =~ /^\S/
395 0 0 if $$self{'EXCLUDE'}
397 0 0 if /^\s+$/
412 0 0 if $$self{'EXCLUDE'}
413 0 0 if $$self{'VERBATIM'}
443 0 0 if @items > 2 and $i != $#items
444 0 0 if @items == 2 and $i == 2
445 0 0 if $i == $#items - 1
470 0 0 if ($command eq 'Z')
480 0 0 if $command eq 'C'
484 0 0 if ($command eq 'E')
485 0 0 if (/^\d+$/) { }
0 0 elsif (exists $Pod::Dsr::ESCAPES{$_}) { }
496 0 0 if $_ eq ''
499 0 0 if ($command eq 'B') { }
0 0 elsif ($command eq 'F') { }
0 0 elsif ($command eq 'I') { }
0 0 elsif ($command eq 'C') { }
515 0 0 if ($command eq 'L')
522 0 0 if ($command eq 'S')
528 0 0 if ($command eq 'X')
550 0 0 if ($$self{'ITEMS'} > 1)
554 0 0 $_ eq 'NAME' ? :
564 0 0 if ($$self{'ITEMS'} > 1)
578 0 0 if ($$self{'ITEMS'} > 1)
593 0 0 if ($$self{'ITEMS'} > 1)
608 0 0 if ($$self{'ITEMS'} > 1)
623 0 0 if ($$self{'ITEMS'} > 1)
636 0 0 unless (/^[-+]?\d+\s+$/)
637 0 0 if (@{$$self{'INDENTS'};} > -1)
650 0 0 unless (defined $$self{'INDENT'})
658 0 0 if (@{$$self{'INDENTS'};} > -1)
677 0 0 if (/\w/ and not /^\w[.\)]\s*$/)
688 0 0 $index ? :
698 0 0 unless my($kind) = /^(\S+)/
699 0 0 if ($kind eq 'man' or $kind eq 'roff' or $kind eq 'dsr' or $kind eq 'rno') { }
720 0 0 unless s/^(?:dsr|rno|man|roff)\b[ \t]*\n?//
739 0 0 if (/ ^ ([^|]+) \| /x)
753 0 0 if (/^"\s*(.*?)\s*"$/) { }
0 0 elsif (/ ^ [-:.\w]+ (?: \( \S+ \) )? $ /x) { }
0 0 elsif (m[/]) { }
760 0 0 if ($manpage =~ /^[-:.\w]+(?:\(\S+\))?$/)
766 0 0 if ($manpage and not $manpage =~ /\^\&/)
772 0 0 if (not length $section || length $manpage) { }
0 0 elsif (not length $section) { }
0 0 elsif ($section =~ /^[:\w]+(?:\(\))?/) { }
778 0 0 length $manpage ? :
781 0 0 unless ($section =~ /^".*"$/)
783 0 0 if length $manpage
816 0 0 if ($last ne '\\fR')
817 0 0 $2 eq 'S' ? :
819 0 0 if ($f eq $last) { }
822 0 0 if ($f ne '\\fR')
842 0 0 $2 eq 'S' ? :
870 0 0 if ($literal) { }
872 0 0 if (ref $_) { }
876 0 0 if $literal > 1
877 0 0 if $literal > 1
882 0 0 ref $_ ? :
967 0 0 if $$self{'ITEMS'} > 1
969 0 0 $$self{'INDENT'} > 0 ? :
0 0 if $$self{'NEEDSPACE'}
979 0 0 unless $section or @entries
982 0 0 if (@entries)
987 0 0 if ($section)
988 0 0 if (defined $index and $index ne '') { }
1023 0 0 if (/\"/ or $c_is_quote and /\\\*\(C[\'\`]/) { }
1030 0 0 if $extra
1031 0 0 if $extra
1032 0 0 $extra ? :
1033 0 0 $extra ? :
1036 0 0 $extra ? :