Branch Coverage

blib/lib/Pod/Simple/Pandoc.pm
Criterion Covered Total %
branch 45 82 54.8


line true false branch
23 0 2 if ($opt{'data-sections'})
50 4 26 if length $1 < $indent
63 0 4 if -d $file
67 2 0 if (not ref $file and $file ne '-')
79 1 0 if $?
94 2 0 if (my($name) = grep({$_->{'header'}->string eq 'NAME';} @$sections))
99 2 0 if $title
100 2 0 if $subtitle
113 0 0 $file ne '-' && !(-e $file) ? :
118 0 0 if ($doc) { }
126 0 0 unless $doc
135 0 0 if $file =~ /\.(pm|pod)$/
136 0 0 if (-x $file)
137 0 0 unless open my $fh, '<', $file
138 0 0 if $fh and (<$fh> // '') =~ /^#!.*perl/
152 0 0 unless is_perl_file($file)
168 0 0 unless -d $dir
177 0 0 if (($doc->metavalue('title') // $module) eq $module) { }
178 0 0 if (not $modules->add($module, $doc) and $opt{'quiet'})
184 0 0 unless $opt{'quiet'}
252 310 330 if (ref $element) { }
253 0 310 unless my $type = $POD_ELEMENT_TYPES{$element->[0]}
258 954 330 $n++ ? :
278 4 112 if (ref $_) { }
299 6 62 if ($type eq 'url') { }
6 56 elsif ($type eq 'man') { }
56 0 elsif ($type eq 'pod') { }
303 6 0 if ($to =~ /^([^(]+)(?:[(](\d+)[)])?$/)
313 50 6 if ($to)
316 10 46 if ($section)
317 6 4 unless $to
335 4 6 if ($target eq 'html') { }
4 2 elsif ($target =~ /^(la)?tex$/) { }
336 2 2 unless $content =~ /^<.+>$/s
341 0 4 unless $content =~ /^[\\{]/
346 4 6 $target eq 'tex' ? :
347 0 10 if (grep {$format eq $_;} @{$$self{'targets'};})
368 8 18 unless @$item
369 10 8 if ($deflist) { }
380 18 10 if ($type =~ /^item-(number|bullet|text)$/) { }
385 10 0 if (@$item == 1 and $item->[0]->name eq 'Plain')