Branch Coverage

blib/lib/Pod/Simple/Pandoc.pm
Criterion Covered Total %
branch 62 86 72.0


line true false branch
23 0 2 if ($opt{'parse'} eq '*')
49 6 41 if length $1 < $indent
62 0 10 if -d $file
66 8 0 if (not ref $file and $file ne '-')
78 1 0 if $?
93 5 3 if (my($name) = grep({$_->{'header'}->string eq 'NAME';} @$sections))
98 5 0 if $title
99 5 0 if $subtitle
112 0 0 $file ne '-' && !(-e $file) ? :
117 0 0 if ($doc) { }
125 0 0 unless $doc
127 0 0 if (@input > 1)
136 2 4 if $file =~ /\.(pm|pod)$/
137 2 2 if (-x $file)
138 0 2 unless open my $fh, '<', $file
139 1 1 if $fh and (<$fh> // '') =~ /^#!.*perl/
153 3 3 unless is_perl_file($file)
171 0 1 unless -d $dir
179 2 1 if (($doc->metavalue('title') // $module) eq $module) { }
181 2 0 $modules->add($module, $doc) ? :
182 1 1 if ($skipped and not $opt{'quiet'})
189 1 0 unless $opt{'quiet'}
257 508 554 if (ref $element) { }
258 0 508 unless my $type = $POD_ELEMENT_TYPES{$element->[0]}
263 1675 554 $n++ ? :
283 6 170 if (ref $_) { }
304 10 105 if ($type eq 'url') { }
9 96 elsif ($type eq 'man') { }
96 0 elsif ($type eq 'pod') { }
308 9 0 if ($to =~ /^([^(]+)(?:[(](\d+)[)])?$/)
318 87 9 if ($to)
321 15 81 if ($section)
322 9 6 unless $to
340 6 9 if ($target eq 'html') { }
6 3 elsif ($target =~ /^(la)?tex$/) { }
341 3 3 unless $content =~ /^<.+>$/s
346 0 6 unless $content =~ /^[\\{]/
351 6 9 $target eq 'tex' ? :
352 0 15 if (grep {$format eq $_;} @{$$self{'parse'};})
373 13 37 unless @$item
374 25 12 if ($deflist) { }
385 37 25 if ($type =~ /^item-(number|bullet|text)$/) { }
390 25 0 if (@$item == 1 and $item->[0]->name eq 'Plain')