| line |
true |
false |
branch |
|
23
|
0 |
0 |
if ($opt{'parse'} eq '*') |
|
49
|
0 |
0 |
if length $1 < $indent |
|
62
|
0 |
0 |
if -d $file |
|
66
|
0 |
0 |
if (not ref $file and $file ne '-') |
|
90
|
0 |
0 |
if (my($name) = grep({$_->{'header'}->string eq 'NAME';} @$sections)) |
|
95
|
0 |
0 |
if $title |
|
96
|
0 |
0 |
if $subtitle |
|
100
|
0 |
0 |
unless (ref $_[0] and $_[0]{'name'}) |
|
105
|
0 |
0 |
if (defined $skip) { } |
|
106
|
0 |
0 |
if ($_->name eq 'Header' and $_->level <= $skip) |
|
109
|
0 |
0 |
$skip ? : |
|
112
|
0 |
0 |
if ($_->name eq 'Header' and $_->string eq 'NAME') { } |
|
135
|
0 |
0 |
$file ne '-' && !(-e $file) ? : |
|
140
|
0 |
0 |
if ($doc) { } |
|
148
|
0 |
0 |
unless $doc |
|
150
|
0 |
0 |
if (@input > 1) |
|
159
|
0 |
0 |
if $file =~ /\.(pm|pod)$/ |
|
160
|
0 |
0 |
if (-f $file) |
|
161
|
0 |
0 |
unless open my $fh, '<', $file |
|
162
|
0 |
0 |
if $fh and (readline $fh // '') =~ /^#!.*perl/ |
|
176
|
0 |
0 |
unless is_perl_file($file) |
|
194
|
0 |
0 |
unless -d $dir |
|
202
|
0 |
0 |
if (($doc->metavalue('title') // $module) eq $module) { } |
|
204
|
0 |
0 |
$modules->add($module, $doc) ? : |
|
205
|
0 |
0 |
if ($skipped and not $opt{'quiet'}) |
|
212
|
0 |
0 |
unless $opt{'quiet'} |
|
280
|
0 |
0 |
if (ref $element) { } |
|
281
|
0 |
0 |
unless my $type = $POD_ELEMENT_TYPES{$element->[0]} |
|
286
|
0 |
0 |
$n++ ? : |
|
306
|
0 |
0 |
if (ref $_) { } |
|
327
|
0 |
0 |
if ($type eq 'url') { } |
|
|
0 |
0 |
elsif ($type eq 'man') { } |
|
|
0 |
0 |
elsif ($type eq 'pod') { } |
|
331
|
0 |
0 |
if ($to =~ /^([^(]+)(?:[(](\d+)[)])?$/) |
|
341
|
0 |
0 |
if ($to and $self->{'podurl'}) |
|
344
|
0 |
0 |
if ($section) |
|
345
|
0 |
0 |
unless $to |
|
351
|
0 |
0 |
if ($url) { } |
|
369
|
0 |
0 |
if ($target eq 'html') { } |
|
|
0 |
0 |
elsif ($target =~ /^(la)?tex$/) { } |
|
370
|
0 |
0 |
unless $content =~ /^<.+>$/s |
|
375
|
0 |
0 |
unless $content =~ /^[\\{]/ |
|
380
|
0 |
0 |
$target eq 'tex' ? : |
|
381
|
0 |
0 |
if (&pandoc()->version ge 2) |
|
384
|
0 |
0 |
if (grep {$format eq $_;} @{$$self{'parse'};}) |
|
386
|
0 |
0 |
&pandoc()->version ge 2 ? : |
|
408
|
0 |
0 |
unless @$item |
|
409
|
0 |
0 |
if ($deflist) { } |
|
420
|
0 |
0 |
if ($type =~ /^item-(number|bullet|text)$/) { } |
|
425
|
0 |
0 |
if (@$item == 1 and $item->[0]->name eq 'Plain') |