Branch Coverage

blib/lib/Pod/Pdf.pm
Criterion Covered Total %
branch 0 348 0.0


line true false branch
132 0 0 unless (@ARGV and $ARGV[0])
136 0 0 if (not $ARGV[0]) { }
137 0 0 unless $in_file
162 0 0 unless ($page % 2)
179 0 0 if $verbose
214 0 0 if (defined($opt_paper) =~ /usletter/i)
215 0 0 unless ($result or $opt_help)
269 0 0 unless (open IN, "<$in_file")
275 0 0 if (/^=include\s*(.*)/)
277 0 0 unless (open INCLUDE, "${dir}:$1")
283 0 0 if defined $_
286 0 0 if defined $_
290 0 0 unless ($pod_found)
291 0 0 if $verbose
306 0 0 if (/^=(back|over|head|item|pod)/)
308 0 0 unless ($pod_found)
314 0 0 unless $pod_found
315 0 0 if (/^=(cut)/)
316 0 0 unless ($in_pod)
317 0 0 if (/^=(pod)/)
318 0 0 if (/^=(begin)/)
319 0 0 if (/^=(for)/)
320 0 0 if (/^=end/)
321 0 0 if (/^\s*$/) { }
322 0 0 if (/^=over.*/)
323 0 0 if (/^=back/)
324 0 0 if (/^\s*\n/)
325 0 0 if (/(^\s+.*)$/ and not $in_text)
326 0 0 if (/S
339 0 0 if ($_ =~ /(L<[^>]*)\n/)
345 0 0 if (/^=head1\s+(.*)$/)
346 0 0 if (/^=head2\s+(.*)$/)
347 0 0 if (/^=item\s+(.*)$/)
348 0 0 if (/(^\s+.*)$/)
355 0 0 if $verbose
379 0 0 if ($ypos <= $bottom_margin + 26)
402 0 0 if ($ypos <= $bottom_margin + 24)
422 0 0 if ($in_verbatim or $in_text)
425 0 0 if ($ypos <= $bottom_margin)
446 0 0 if ($_[0] =~ /^=over\s*(\d+)/) { }
451 0 0 if ($set)
458 0 0 if (--$set < 0)
459 0 0 unless (defined $ov[$set])
461 0 0 if ($cLM < $left_margin + $left_indent)
475 0 0 unless $in_verbatim
476 0 0 if ($ypos <= $bottom_margin + $LF and $more)
488 0 0 if ($in_verbatim) { }
0 0 elsif (not $in_verbatim and $bl) { }
499 0 0 unless $in_tab
500 0 0 if ($ypos <= $bottom_margin + $LF and $more)
512 0 0 if ($in_heading)
513 0 0 if ($bl) { }
525 0 0 if ($in_verbatim)
526 0 0 if ($in_tab)
527 0 0 if ($in_text)
528 0 0 if ($in_heading)
532 0 0 if ($ypos <= $bottom_margin + $LF and $more and $zlf)
539 0 0 $special ? :
547 0 0 if $bl
550 0 0 if ($for)
552 0 0 $for < 0 ? :
553 0 0 $for ? :
555 0 0 if ($in_text) { }
0 0 elsif ($in_verbatim) { }
0 0 elsif ($in_heading) { }
572 0 0 if ($lineleng <= $indent - 2 and $str =~ /\007|\d+/) { }
583 0 0 if (/\001(.*)>(.*)/)
600 0 0 if ($str =~ /\n/) { }
601 0 0 if $line
602 0 0 if $line and @lk
615 0 0 if (/ /)
616 0 0 if (/[\001-\006]/)
617 0 0 if (/\t/)
619 0 0 if $line
620 0 0 if $line and @lk
629 0 0 if ($in_link)
632 0 0 if ($lineleng + $wordleng <= $end - $xpos or $in_verbatim or $in_tab) { }
635 0 0 unless $word eq "\t"
636 0 0 if $word eq ' '
642 0 0 if ($spaces < 1)
645 0 0 if @lk
647 0 0 if ($ypos <= $bottom_margin)
656 0 0 if ($word eq ' ') { }
661 0 0 if ($xpos != $cLM + $indent and $tab_str) { }
665 0 0 if ($in_heading) { }
676 0 0 if ($rem =~ /\001/) { }
677 0 0 if ($in_link)
679 0 0 if ($j < 0)
683 0 0 if ($rem =~ /\002/)
684 0 0 if ($rem =~ /\003/)
685 0 0 if ($rem =~ /\004/)
686 0 0 if ($rem =~ /\005/)
687 0 0 if ($rem =~ /\006/)
694 0 0 if $verbose == 2
695 0 0 if (not $op) { }
0 0 elsif ($op == 1) { }
0 0 elsif ($op == 2) { }
699 0 0 if $verbose == 2
704 0 0 if $verbose == 2
707 0 0 if $verbose == 2
715 0 0 unless defined $xbase
717 0 0 unless defined $str
718 0 0 unless defined $len
719 0 0 unless defined $sps
720 0 0 if ($xbase + $len > $end)
722 0 0 if $tab_str
730 0 0 if ($str =~ /(http|ftp|mailto)\s*:/)
748 0 0 if $k >= $k_max
752 0 0 if $line
754 0 0 if (/[\001-\007]/)
755 0 0 if (/\007/)
757 0 0 if $p < 0
0 0 if (/\001/) { }
761 0 0 if (/\002/) { }
0 0 elsif (/\003/) { }
0 0 elsif (/\004/) { }
0 0 elsif (/\005/) { }
0 0 elsif (/\006/) { }
800 0 0 if ($setStyles{$set}[1] eq 'Times') { }
0 0 elsif ($setStyles{$set}[1] eq 'Courier') { }
0 0 elsif ($setStyles{$set}[1] eq 'Helvetica') { }
806 0 0 if ($setStyles{$set}[2] eq 'Regular') { }
0 0 elsif ($setStyles{$set}[2] eq 'Bold') { }
0 0 elsif ($setStyles{$set}[2] eq 'Oblique') { }
0 0 elsif ($setStyles{$set}[2] eq 'BoldOblique') { }
0 0 elsif ($setStyles{$set}[2] eq 'Italic') { }
0 0 elsif ($setStyles{$set}[2] eq 'ItalicOblique') { }
824 0 0 if ($sc[$p] ne $current_color)
825 0 0 unless defined $colorstyle{$sc[$p]}
850 0 0 if ($section eq 'doc') { }
0 0 elsif ($section eq 'toc') { }
0 0 elsif ($section eq 'cov') { }
855 0 0 if ($page % 2) { }
945 0 0 if (@annot) { }
983 0 0 if ($section eq 'doc') { }
0 0 elsif ($section eq 'toc') { }
0 0 elsif ($section eq 'cov') { }
994 0 0 if ($page % 2) { }
1023 0 0 if (defined $in_str)
1038 0 0 if (defined $r_str and defined $l_str)
1049 0 0 if ($in_text)
1072 0 0 if ($diff <= -12) { }
0 0 elsif ($diff > 12) { }
1075 0 0 if ($zone =~ /-/) { }
1095 0 0 unless open OUT, ">$of"
1096 0 0 if $^O eq 'MacOS'
1098 0 0 if $verbose
1275 0 0 unless $ol[$_]{'level'}
1276 0 0 if ($ypos <= 70)
1297 0 0 unless ($page % 2)
1310 0 0 if ($length + $strt > 450)
1311 0 0 if ($ret =~ /(.*)\s+.*/)
1325 0 0 if ($_[0] % 2) { }
1341 0 0 unless length $str
1343 0 0 if ($level == 1) { }
0 0 elsif ($level == 2) { }
0 0 elsif ($level == 3 and not $h2) { }
1372 0 0 if ($ol[$i]{'level'} == $ol[$_]{'level'}) { }
1375 0 0 if ($i <= $no)
1377 0 0 if (defined $ol[$i]{'level'} and $ol[$i]{'level'} == $ol[$_]{'level'}) { }
1381 0 0 if ($i <= $no)
1383 0 0 if ($ol[$i]{'level'} == $ol[$_]{'level'} + 1)
1384 0 0 if ($ol[$i]{'level'} >= $ol[$_]{'level'} + 2)
1391 0 0 if defined $parent
1392 0 0 if defined $previous
1393 0 0 if defined $next
1394 0 0 if defined $kids[0]
1395 0 0 if defined $kids[-1]
1397 0 0 $ol[$_]{'level'} == 0 ? :
1404 0 0 if defined $previous
1405 0 0 if defined $next
1406 0 0 if defined $first
1407 0 0 if defined $last
1408 0 0 if $count