line |
true |
false |
branch |
106
|
0 |
0 |
if (ref $tree eq '') { } |
|
0 |
0 |
elsif (not $tree->[0] eq 'X' && $parser->nix_X_codes) { } |
179
|
27 |
1 |
if $Htmlroot eq "/" |
182
|
10 |
17 |
if ($Htmlroot eq "" and defined $Htmldir and $Htmldir ne "" and substr($Htmlfile, 0, length $Htmldir) eq $Htmldir) |
198
|
25 |
3 |
unless (get_cache($Dircache, \@Podpath, $Podroot, $Recurse)) |
201
|
0 |
25 |
unless chdir $Podroot |
210
|
0 |
25 |
unless chdir $pwd |
213
|
1 |
24 |
if $Verbose |
214
|
0 |
25 |
unless open my $cache, ">", $Dircache |
220
|
0 |
468 |
if ($_updirs_only) |
231
|
0 |
25 |
unless close $cache |
235
|
0 |
28 |
if (@ARGV and $ARGV[0]) { } |
236
|
28 |
0 |
if ($Podfile and $Podfile ne '-') { } |
247
|
25 |
3 |
unless (defined $encoding) |
257
|
1 |
27 |
if $Verbose |
260
|
21 |
7 |
unless (defined $Title) |
261
|
18 |
2 |
if ($podtree->[0] eq "Document" and ref $podtree->[2] eq "ARRAY" and $podtree->[2][0] eq "head1" and @{$podtree->[2];} == 3 and ref $podtree->[2][2] eq "" and $podtree->[2][2] eq "NAME" and ref $podtree->[3] eq "ARRAY" and $podtree->[3][0] eq "Para" and @{$podtree->[3];} >= 3 and not grep({ref $_ ne "";} @{$$podtree[3];}[2 .. $#{$$podtree[3];}]) and @$podtree == 4 || ref $podtree->[4] eq 'ARRAY' && $podtree->[4][0] eq 'head1') |
302
|
5 |
23 |
$Backlink ? : |
307
|
4 |
24 |
if ($Css) |
315
|
5 |
23 |
$Header ? : |
350
|
0 |
28 |
unless $Htmlfile |
352
|
28 |
0 |
if ($Htmlfile and $Htmlfile ne '-') { } |
353
|
0 |
28 |
unless open $fhout, ">", $Htmlfile |
360
|
0 |
28 |
unless close $fhout |
361
|
28 |
0 |
unless $Htmlfile eq "-" |
368
|
0 |
0 |
if @_ |
417
|
0 |
28 |
if $Pod::L10N::Html::Config{'pod2html'} |
438
|
0 |
28 |
unless $result |
440
|
0 |
28 |
if defined $opt_help |
443
|
25 |
3 |
if defined $opt_podpath |
445
|
5 |
23 |
if defined $opt_backlink |
446
|
1 |
27 |
if defined $opt_cachedir |
447
|
4 |
24 |
if defined $opt_css |
448
|
5 |
23 |
if defined $opt_header |
449
|
14 |
14 |
if defined $opt_htmldir |
450
|
23 |
5 |
if defined $opt_htmlroot |
451
|
3 |
25 |
if defined $opt_index |
452
|
28 |
0 |
if defined $opt_infile |
453
|
28 |
0 |
if defined $opt_outfile |
454
|
1 |
27 |
if defined $opt_poderrors |
455
|
24 |
4 |
if defined $opt_podroot |
456
|
19 |
9 |
if defined $opt_quiet |
457
|
3 |
25 |
if defined $opt_recurse |
458
|
7 |
21 |
if defined $opt_title |
459
|
1 |
27 |
if defined $opt_verbose |
461
|
0 |
28 |
if $opt_verbose and defined $opt_flush |
464
|
0 |
28 |
if (defined $opt_flush) |
480
|
2 |
26 |
if $Saved_Cache_Key and $this_cache_key eq $Saved_Cache_Key |
486
|
1 |
25 |
if (-f $dircache) |
487
|
0 |
1 |
if $Verbose |
508
|
0 |
1 |
if $Verbose |
509
|
0 |
1 |
unless open my $cachefh, "<", $dircache |
516
|
1 |
0 |
if join(":", @$podpath) eq $_ |
521
|
1 |
0 |
if $podroot eq $_ |
524
|
0 |
1 |
if ($tests != 2) |
529
|
0 |
1 |
if $Verbose |
592
|
18 |
404 |
$Podroot eq 'File::Spec'->curdir ? : |
606
|
45 |
602 |
unless $full_path |
607
|
27 |
575 |
if $full_path eq "/" |
610
|
0 |
575 |
$dirs eq 'File::Spec'->curdir ? : |
613
|
0 |
575 |
if (defined $vol and $vol) |
614
|
0 |
0 |
if $^O eq "VMS" |
615
|
0 |
0 |
if $^O eq "MSWin32" |
617
|
0 |
0 |
if ($dirs[0]) { } |
624
|
126 |
449 |
if "File::Spec"->file_name_is_absolute($full_path) |
625
|
20 |
555 |
unless scalar @dirs |
628
|
0 |
555 |
if $^O eq "MSWin32" |
629
|
0 |
555 |
if $^O eq "VMS" |
643
|
3 |
351 |
if ($o =~ /^=encoding (.+)/l) |
648
|
141 |
210 |
if ($o =~ /^=/l) { } |
649
|
4 |
137 |
if (defined $t) { } |
656
|
0 |
210 |
if (defined $t) { } |
697
|
76 |
83 |
if $not_unique |
706
|
0 |
118 |
unless defined $to or defined $section |
707
|
76 |
42 |
if (defined $section) { } |
709
|
47 |
29 |
unless defined $to |
715
|
44 |
27 |
if (exists $self->pages->{$to}) { } |
722
|
5 |
593 |
if $modname =~ /::\Q$to\E\z/l |
725
|
22 |
5 |
if ($#matches == -1) { } |
|
5 |
0 |
elsif ($#matches == 0) { } |
726
|
0 |
22 |
unless $self->quiet |
731
|
0 |
5 |
unless $self->quiet |
736
|
0 |
0 |
unless $self->quiet |
749
|
23 |
26 |
if ($self->htmlfileurl ne "") |
779
|
23 |
0 |
if ($dest ne "") |
783
|
23 |
0 |
if ($rel_path ne '' and substr($rel_path, -1) ne '/') { } |
796
|
67 |
0 |
unless defined $add |
800
|
65 |
2 |
unless (defined $trans) |
805
|
6 |
61 |
$_[0]->backlink && $h - $add == 0 ? : |
815
|
14 |
2 |
unless (defined $trans) |
820
|
16 |
0 |
$_[0]{'anchor_items'} ? : |
828
|
6 |
10 |
if ($_[0]{'in_dd'}[$_[0]{'dl_level'}]) |