| line |
true |
false |
branch |
|
166
|
27 |
1 |
if $Htmlroot eq '/' |
|
169
|
10 |
17 |
if ($Htmlroot eq '' and defined $Htmldir and $Htmldir ne '' and substr($Htmlfile, 0, length $Htmldir) eq $Htmldir) |
|
185
|
25 |
3 |
unless (get_cache($Dircache, \@Podpath, $Podroot, $Recurse)) |
|
188
|
0 |
25 |
unless chdir $Podroot |
|
197
|
0 |
25 |
unless chdir $pwd |
|
200
|
1 |
24 |
if $Verbose |
|
201
|
0 |
25 |
unless open my $cache, '>', $Dircache |
|
207
|
0 |
492 |
if ($_updirs_only) |
|
218
|
0 |
25 |
unless close $cache |
|
247
|
5 |
23 |
$Backlink ? : |
|
252
|
4 |
24 |
if ($Css) |
|
260
|
0 |
28 |
if (@ARGV and $ARGV[0]) { } |
|
261
|
28 |
0 |
if ($Podfile and $Podfile ne '-') { } |
|
272
|
25 |
3 |
unless (defined $encoding) |
|
277
|
5 |
23 |
$Header ? : |
|
307
|
1 |
27 |
if $Verbose |
|
313
|
0 |
28 |
unless $Htmlfile |
|
315
|
28 |
0 |
if ($Htmlfile and $Htmlfile ne '-') { } |
|
316
|
0 |
28 |
unless open $fhout, '>', $Htmlfile |
|
323
|
0 |
28 |
unless close $fhout |
|
324
|
28 |
0 |
unless $Htmlfile eq '-' |
|
331
|
0 |
0 |
if @_ |
|
380
|
0 |
28 |
if $Pod::L10N::Html::Config{'pod2html'} |
|
401
|
0 |
28 |
unless $result |
|
403
|
0 |
28 |
if defined $opt_help |
|
406
|
25 |
3 |
if defined $opt_podpath |
|
408
|
5 |
23 |
if defined $opt_backlink |
|
409
|
1 |
27 |
if defined $opt_cachedir |
|
410
|
4 |
24 |
if defined $opt_css |
|
411
|
5 |
23 |
if defined $opt_header |
|
412
|
14 |
14 |
if defined $opt_htmldir |
|
413
|
23 |
5 |
if defined $opt_htmlroot |
|
414
|
3 |
25 |
if defined $opt_index |
|
415
|
28 |
0 |
if defined $opt_infile |
|
416
|
28 |
0 |
if defined $opt_outfile |
|
417
|
1 |
27 |
if defined $opt_poderrors |
|
418
|
24 |
4 |
if defined $opt_podroot |
|
419
|
19 |
9 |
if defined $opt_quiet |
|
420
|
3 |
25 |
if defined $opt_recurse |
|
421
|
7 |
21 |
if defined $opt_title |
|
422
|
1 |
27 |
if defined $opt_verbose |
|
424
|
0 |
28 |
if $opt_verbose and defined $opt_flush |
|
427
|
0 |
28 |
if (defined $opt_flush) |
|
443
|
2 |
26 |
if $Saved_Cache_Key and $this_cache_key eq $Saved_Cache_Key |
|
449
|
1 |
25 |
if (-f $dircache) |
|
450
|
0 |
1 |
if $Verbose |
|
471
|
0 |
1 |
if $Verbose |
|
472
|
0 |
1 |
unless open my $cachefh, '<', $dircache |
|
479
|
1 |
0 |
if join(':', @$podpath) eq $_ |
|
484
|
1 |
0 |
if $podroot eq $_ |
|
487
|
0 |
1 |
if ($tests != 2) |
|
492
|
0 |
1 |
if $Verbose |
|
555
|
19 |
425 |
$Podroot eq 'File::Spec'->curdir ? : |
|
569
|
45 |
624 |
unless $full_path |
|
570
|
27 |
597 |
if $full_path eq '/' |
|
573
|
0 |
597 |
$dirs eq 'File::Spec'->curdir ? : |
|
576
|
0 |
597 |
if (defined $vol and $vol) |
|
577
|
0 |
0 |
if $^O eq 'VMS' |
|
578
|
0 |
0 |
if $^O eq 'MSWin32' |
|
580
|
0 |
0 |
if ($dirs[0]) { } |
|
587
|
126 |
471 |
if 'File::Spec'->file_name_is_absolute($full_path) |
|
588
|
20 |
577 |
unless scalar @dirs |
|
591
|
0 |
577 |
if $^O eq 'MSWin32' |
|
592
|
0 |
577 |
if $^O eq 'VMS' |
|
606
|
3 |
351 |
if ($o =~ /^=encoding (.+)/l) |
|
611
|
141 |
210 |
if ($o =~ /^=/l) { } |
|
612
|
4 |
137 |
if (defined $t) { } |
|
619
|
0 |
210 |
if (defined $t) { } |
|
660
|
76 |
83 |
if $not_unique |
|
669
|
0 |
118 |
unless defined $to or defined $section |
|
670
|
76 |
42 |
if (defined $section) { } |
|
672
|
47 |
29 |
unless defined $to |
|
678
|
44 |
27 |
if (exists $self->pages->{$to}) { } |
|
685
|
5 |
622 |
if $modname =~ /::\Q$to\E\z/l |
|
688
|
22 |
5 |
if ($#matches == -1) { } |
|
|
5 |
0 |
elsif ($#matches == 0) { } |
|
689
|
0 |
22 |
unless $self->quiet |
|
694
|
0 |
5 |
unless $self->quiet |
|
699
|
0 |
0 |
unless $self->quiet |
|
712
|
23 |
26 |
if ($self->htmlfileurl ne '') |
|
742
|
23 |
0 |
if ($dest ne '') |
|
746
|
23 |
0 |
if ($rel_path ne '' and substr($rel_path, -1) ne '/') { } |
|
759
|
67 |
0 |
unless defined $add |
|
763
|
65 |
2 |
unless (defined $trans) |
|
768
|
6 |
61 |
$_[0]->backlink && $h - $add == 0 ? : |
|
778
|
14 |
2 |
unless (defined $trans) |
|
783
|
16 |
0 |
$_[0]{'anchor_items'} ? : |
|
791
|
6 |
10 |
if ($_[0]{'in_dd'}[$_[0]{'dl_level'}]) |