Branch Coverage

blib/lib/Pod/L10N/Html.pm
Criterion Covered Total %
branch 118 150 78.6


line true false branch
113 27 2 unless ($self->get_cache)
121 26 3 unless (defined $lencoding)
197 22 7 defined $opts->{'podpath'} ? :
200 5 24 if defined $opts->{'backlink'}
201 1 28 if defined $opts->{'cachedir'}
202 4 25 if defined $opts->{'css'}
203 5 24 if defined $opts->{'header'}
204 15 14 if defined $opts->{'htmldir'}
205 3 26 if defined $opts->{'htmlroot'}
206 3 26 if defined $opts->{'index'}
207 29 0 if defined $opts->{'infile'}
208 29 0 if defined $opts->{'outfile'}
209 1 28 if defined $opts->{'poderrors'}
210 17 12 if defined $opts->{'podroot'}
211 19 10 if defined $opts->{'quiet'}
212 3 26 if defined $opts->{'recurse'}
213 7 22 if defined $opts->{'title'}
214 1 28 if defined $opts->{'verbose'}
217 0 29 if $opts->{'verbose'} and defined $opts->{'flush'}
219 0 29 if (defined $opts->{'flush'})
229 28 1 if $self->{'Htmlroot'} eq "/"
232 11 17 if ($self->{'Htmlroot'} eq "" and defined $self->{'Htmldir'} and $self->{'Htmldir'} ne "" and substr($self->{'Htmlfile'}, 0, length $self->{'Htmldir'}) eq $self->{'Htmldir'})
251 0 27 unless chdir $self->{'Podroot'}
269 0 27 unless chdir $pwd
272 1 26 if $self->{'Verbose'}
274 0 27 unless open my $cache, ">", $self->{'Dircache'}
279 0 354 if ($_updirs_only)
289 0 27 unless close $cache
297 85 269 $self->{'Podroot'} eq 'File::Spec'->curdir ? :
314 0 29 if $self->{'Saved_Cache_Key'} and $this_cache_key eq $self->{'Saved_Cache_Key'}
320 2 27 if (-f $self->{'Dircache'})
321 0 2 if $self->{'Verbose'}
348 0 2 if $self->{'Verbose'}
349 0 2 unless open my $cachefh, "<", $self->{'Dircache'}
356 2 0 if join(":", @{$self->{'Podpath'};}) eq $_
361 2 0 if $self->{'Podroot'} eq $_
364 0 2 if ($tests != 2)
369 0 2 if $self->{'Verbose'}
382 0 29 if (@ARGV and $ARGV[0]) { }
383 29 0 if ($self->{'Podfile'} and $self->{'Podfile'} ne '-') { }
406 1 28 if $self->{'Verbose'}
413 22 7 unless (defined $self->{'Title'})
414 19 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')
438 5 24 $self->{'Backlink'} ? :
443 4 25 if ($self->{'Css'})
452 5 24 $self->{'Header'} ? :
488 652 540 if (ref $tree eq '') { }
528 12 elsif (not $tree->[0] eq 'X' && $parser->nix_X_codes) { }
499 0 29 unless $self->{'Htmlfile'}
501 29 0 if ($self->{'Htmlfile'} and $self->{'Htmlfile'} ne '-') { }
503 0 29 unless open $fhout, ">", $self->{'Htmlfile'}
509 0 29 unless close $fhout
510 29 0 unless $self->{'Htmlfile'} eq "-"
523 3 359 if ($o =~ /^=encoding (.+)/l)
528 143 216 if ($o =~ /^=/l) { }
529 4 139 if (defined $t) { }
536 0 216 if (defined $t) { }
576 78 85 if $not_unique
585 0 123 unless defined $to or defined $section
586 78 45 if (defined $section) { }
588 47 31 unless defined $to
594 43 33 if (exists $self->pages->{$to}) { }
601 8 566 if $modname =~ /::\Q$to\E\z/l
607 25 8 if ($#matches == -1) { }
8 0 elsif ($#matches == 0) { }
608 1 24 if $self->verbose
615 0 8 if $self->verbose
624 0 0 if $self->verbose
635 25 26 if ($self->htmlfileurl ne "")
652 69 0 unless defined $add
656 67 2 unless (defined $trans)
661 6 63 $_[0]->backlink && $h - $add == 0 ? :
671 14 2 unless (defined $trans)
676 16 0 $_[0]{'anchor_items'} ? :
684 6 10 if ($_[0]{'in_dd'}[$_[0]{'dl_level'}])