Branch Coverage

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


line true false branch
142 0 0 unless defined $input
143 0 0 if ($input =~ /^-h$/ or $input =~ /^--help$/)
145 0 0 if ($input =~ /^-v$/ or $input =~ /^--version$/)
151 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') { }
165 0 0 if ($pgPerOutputPage == 4) { }
167 0 0 $inpPgNum >= 5 ? :
0 0 $inpPgNum >= 9 ? :
0 0 $inpPgNum >= 13 ? :
172 0 0 $inpPgNum >= 5 ? :
0 0 $inpPgNum >= 9 ? :
0 0 $inpPgNum >= 13 ? :
180 0 0 if $_ % $pgPerOutputPage == 0
182 0 0 if $target_page > $inpPgNum
184 0 0 $_ % 4 > 1 ? :
188 0 0 if $numPagImposed == $inpPgNum
201 0 0 unless $Gpos
202 0 0 if $Gstream
215 0 0 unless $Gpos
217 0 0 unless my $pagenumber = $param->{'page'}
218 0 0 unless my $x = $param->{'x'}
219 0 0 unless my $y = $param->{'y'}
220 0 0 unless my $rotate = $param->{'rotate'}
228 0 0 unless defined $refNr
230 0 0 unless $refNr
270 0 0 if exists $resources{$resourceDict}
273 0 0 if keys %resources < 10
308 0 0 unless $Gparents[0]
315 0 0 if $Gcounts[0] > 9
323 0 0 unless $Gpos
325 0 0 if $Gstream
357 0 0 unless $Gparents[$j]
385 0 0 defined $Gparents[0] ? :
387 0 0 if (defined $Gparents[$i])
391 0 0 if ($Gparents[$j])
422 0 0 unless $rotate
442 0 0 if $buf =~ /Encrypt/
445 0 0 if ($buf =~ m[/Prev\s+\d]) { }
0 0 elsif ($buf =~ /\bstartxref\s+(\d+)/) { }
462 0 0 if $xref > &getInputFileWeight
465 0 0 unless $tempRoot
479 0 0 if $readBytes =~ /^\s?(\d{10}) \d{5} n/
497 0 0 if ($readBytes =~ /^(xref$cr)/) { }
0 0 elsif ($readBytes =~ /^\d+\s+\d+\s+obj/) { }
518 0 0 if $buf =~ m[\/Root\s+(\d+)\s+\d+\s+R]
529 0 0 unless defined $GObjects{$index}
546 0 0 if ($objectContent =~ /^(\d+ \d+ obj\s*<<)(.+)(>>\s*stream)/s) { }
553 0 0 if $objectContent =~ /^(\d+ \d+ obj)\b/
569 0 0 unless &getPageSizeAndSetMediabox
577 0 0 if (alike($_, $Gpaper{'QuarterLetter'}))
578 0 0 if (alike($_, $Gpaper{'A6'}))
579 0 0 if (alike($_, $Gpaper{'HalfLetter'}))
580 0 0 if (alike($_, $Gpaper{'QuarterLegal'}))
581 0 0 if (alike($_, $Gpaper{'A5'}))
582 0 0 if (alike($_, $Gpaper{'HalfLegal'}))
583 0 0 if (alike($_, $Gpaper{'Letter'}))
584 0 0 if (alike($_, $Gpaper{'A4'}))
585 0 0 if (alike($_, $Gpaper{'Legal'}))
586 0 0 if (alike($_, $Gpaper{'Tabloid'}))
587 0 0 if (alike($_, $Gpaper{'A3'}))
598 0 0 if $hxw > $namedHxw + $tolerance or $hxw < $namedHxw - $tolerance
607 0 0 if $pagenumber > &getInputPageCount
615 0 0 unless $objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R]
652 0 0 unless $objectContent =~ m(/Kids\s*\[([^\]]+))
661 0 0 unless @pageObjBackup
664 0 0 if ($objectContent =~ m[/Count\s+(\d+)]) { }
665 0 0 if ($pageAccumulator + $1 < $pagenumber) { }
668 0 0 if $objectContent =~ m(/Kids\s*\[([^\]]+))
675 0 0 if $pageAccumulator == $pagenumber
689 0 0 unless $objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R]
691 0 0 unless $objectContent =~ /MediaBox/
695 0 0 unless (@GmediaBox)
697 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/) { }
701 0 0 if ($ref =~ /\[\s*([\S]+)\s+([\S]+)\s+([\S]+)\s+([\S]+)\s*\]/) { }
721 0 0 if $objContent =~ m[/Contents\s+(\d+)] or $objContent =~ m(/Contents\s*\[\s*(\d+)\s+\d+\s+R\s*\])
735 0 0 if $objContent =~ /Resources\s+(\d+\s+\d+\s+R)/
736 0 0 if ($objContent =~ m[^.+/Resources]s)
743 0 0 if (/\S/)
745 0 0 if /<
746 0 0 if />>/
747 0 0 if $k == 0
759 0 0 if defined $maxPages
762 0 0 unless eval { do { $objectContent = getContentOfObjectNr($GrootNr); 1 } }
763 0 0 if ($objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R])
765 0 0 if $objectContent =~ m[/Count\s+(\d+)]
776 0 0 unless &getInputFileWeight
778 0 0 unless open $IN_FILE, "<", $GinFile
782 0 0 if $c ne "%PDF-"
786 0 0 unless $GrootNr > 0
799 0 0 unless $known
837 0 0 if exists $known{$1}
854 0 0 if $readBytes =~ /^(\d+)\s+(\d+)/
862 0 0 if $Gpos
867 0 0 unless open $OUT_FILE, ">", $outputfile