Branch Coverage

blib/lib/App/paperback.pm
Criterion Covered Total %
branch 0 208 0.0


line true false branch
143 0 0 unless defined $input
144 0 0 if print STDERR "$sayHelp"
0 0 if ($input =~ /^-h$/ or $input =~ /^--help$/)
146 0 0 if print STDERR "$sayVersion\n"
0 0 if ($input =~ /^-v$/ or $input =~ /^--version$/)
152 0 0 if ($_ eq 'A6') { }
0 0 elsif ($_ eq 'A5') { }
0 0 elsif ($_ eq 'QT') { }
0 0 elsif ($_ eq 'QG') { }
0 0 elsif ($_ eq 'HT') { }
0 0 elsif ($_ eq 'HG') { }
0 0 elsif ($_ eq 'LT') { }
0 0 elsif ($_ eq 'A4') { }
166 0 0 if ($pgPerOutputPage == 4) { }
168 0 0 $inpPgNum >= 5 ? :
0 0 $inpPgNum >= 9 ? :
0 0 $inpPgNum >= 13 ? :
173 0 0 $inpPgNum >= 5 ? :
0 0 $inpPgNum >= 9 ? :
0 0 $inpPgNum >= 13 ? :
181 0 0 if $_ % $pgPerOutputPage == 0
183 0 0 if $target_page > $inpPgNum
185 0 0 $_ % 4 > 1 ? :
189 0 0 if $numPagImposed == $inpPgNum
202 0 0 unless $Gpos
203 0 0 if $Gstream
216 0 0 unless $Gpos
218 0 0 unless my $pagenumber = $param->{'page'}
219 0 0 unless my $x = $param->{'x'}
220 0 0 unless my $y = $param->{'y'}
221 0 0 unless my $rotate = $param->{'rotate'}
229 0 0 unless defined $refNr
231 0 0 unless $refNr
271 0 0 if exists $resources{$resourceDict}
274 0 0 if keys %resources < 10
309 0 0 unless ($Gparents[0])
318 0 0 if $Gcounts[0] > 9
326 0 0 unless $Gpos
328 0 0 if $Gstream
360 0 0 unless ($Gparents[$j])
391 0 0 defined $Gparents[0] ? :
393 0 0 if (defined $Gparents[$i])
397 0 0 if ($Gparents[$j])
428 0 0 if ($rotate)
447 0 0 if $buf =~ /Encrypt/
450 0 0 if ($buf =~ m[/Prev\s+\d]) { }
0 0 elsif ($buf =~ /\bstartxref\s+(\d+)/) { }
467 0 0 if $xref > &getInputFileWeight
470 0 0 unless $tempRoot
484 0 0 if $readBytes =~ /^\s?(\d{10}) \d{5} n/
502 0 0 if ($readBytes =~ /^(xref$cr)/) { }
0 0 elsif ($readBytes =~ /^\d+\s+\d+\s+obj/) { }
523 0 0 if $buf =~ m[\/Root\s+(\d+)\s+\d+\s+R]
534 0 0 unless defined $GObjects{$index}
551 0 0 if ($objectContent =~ /^(\d+ \d+ obj\s*<<)(.+)(>>\s*stream)/s) { }
558 0 0 if $objectContent =~ /^(\d+ \d+ obj)\b/
574 0 0 unless &getPageSizeAndSetMediabox
582 0 0 if (alike($_, $Gpaper{'QuarterLetter'}))
583 0 0 if (alike($_, $Gpaper{'A6'}))
584 0 0 if (alike($_, $Gpaper{'HalfLetter'}))
585 0 0 if (alike($_, $Gpaper{'QuarterLegal'}))
586 0 0 if (alike($_, $Gpaper{'A5'}))
587 0 0 if (alike($_, $Gpaper{'HalfLegal'}))
588 0 0 if (alike($_, $Gpaper{'Letter'}))
589 0 0 if (alike($_, $Gpaper{'A4'}))
590 0 0 if (alike($_, $Gpaper{'Legal'}))
591 0 0 if (alike($_, $Gpaper{'Tabloid'}))
592 0 0 if (alike($_, $Gpaper{'A3'}))
603 0 0 if $hxw > $namedHxw + $tolerance or $hxw < $namedHxw - $tolerance
612 0 0 if $pagenumber > &getInputPageCount
620 0 0 unless $objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R]
657 0 0 unless $objectContent =~ m(/Kids\s*\[([^\]]+))
666 0 0 unless @pageObjBackup
669 0 0 if ($objectContent =~ m[/Count\s+(\d+)]) { }
670 0 0 if ($pageAccumulator + $1 < $pagenumber) { }
673 0 0 if $objectContent =~ m(/Kids\s*\[([^\]]+))
680 0 0 if $pageAccumulator == $pagenumber
694 0 0 unless $objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R]
696 0 0 unless $objectContent =~ /MediaBox/
700 0 0 unless (@GmediaBox)
702 0 0 if (/MediaBox\s*\[\s*([\S]+)\s+([\S]+)\s+([\S]+)\s+([\S]+)\s*\]/) { }
0 0 elsif (/MediaBox\s*(\d+)\s+\d+\s+R\b/) { }
706 0 0 if ($ref =~ /\[\s*([\S]+)\s+([\S]+)\s+([\S]+)\s+([\S]+)\s*\]/) { }
726 0 0 if ($objContent =~ m[/Contents\s+(\d+)]) { }
0 0 elsif ($objContent =~ m(/Contents\s*\[\s*(\d+)\s+\d+\s+R\s*\])) { }
742 0 0 if $objContent =~ /Resources\s+(\d+\s+\d+\s+R)/
743 0 0 if ($objContent =~ m[^.+/Resources]s)
750 0 0 if (/\S/)
752 0 0 if /<
753 0 0 if />>/
754 0 0 if $k == 0
766 0 0 if defined $maxPages
769 0 0 unless eval { do { $objectContent = getContentOfObjectNr($GrootNr); 1 } }
770 0 0 if ($objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R])
772 0 0 if $objectContent =~ m[/Count\s+(\d+)]
783 0 0 unless &getInputFileWeight
785 0 0 unless open $IN_FILE, "<", $GinFile
789 0 0 if $c ne "%PDF-"
793 0 0 unless $GrootNr > 0
806 0 0 unless $known
844 0 0 if exists $known{$1}
861 0 0 if $readBytes =~ /^(\d+)\s+(\d+)/
869 0 0 if $Gpos
874 0 0 unless open $OUT_FILE, ">", $outputfile