Branch Coverage

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


line true false branch
144 0 0 unless defined $input
145 0 0 if print STDERR "$sayHelp"
0 0 if ($input =~ /^-h$/ or $input =~ /^--help$/)
147 0 0 if print STDERR "$sayVersion\n"
0 0 if ($input =~ /^-v$/ or $input =~ /^--version$/)
153 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') { }
167 0 0 if ($pgPerOutputPage == 4) { }
169 0 0 if ($inpPgNum >= 13) { }
0 0 elsif ($inpPgNum >= 9) { }
0 0 elsif ($inpPgNum >= 5) { }
175 0 0 if ($inpPgNum >= 13) { }
0 0 elsif ($inpPgNum >= 9) { }
0 0 elsif ($inpPgNum >= 5) { }
184 0 0 if $_ % $pgPerOutputPage == 0
186 0 0 if $target_page > $inpPgNum
188 0 0 $_ % 4 > 1 ? :
192 0 0 if $numPagImposed == $inpPgNum
205 0 0 unless $Gpos
206 0 0 if $Gstream
219 0 0 unless $Gpos
221 0 0 unless my $pagenumber = $param->{'page'}
222 0 0 unless my $x = $param->{'x'}
223 0 0 unless my $y = $param->{'y'}
224 0 0 unless my $rotate = $param->{'rotate'}
232 0 0 unless defined $refNr
234 0 0 unless $refNr
274 0 0 if exists $resources{$resourceDict}
277 0 0 if keys %resources < 10
312 0 0 unless ($Gparents[0])
321 0 0 if $Gcounts[0] > 9
329 0 0 unless $Gpos
331 0 0 if $Gstream
363 0 0 unless ($Gparents[$j])
394 0 0 defined $Gparents[0] ? :
396 0 0 if (defined $Gparents[$i])
400 0 0 if ($Gparents[$j])
431 0 0 if ($rotate)
450 0 0 if $buf =~ /Encrypt/
453 0 0 if ($buf =~ m[/Prev\s+\d]) { }
0 0 elsif ($buf =~ /\bstartxref\s+(\d+)/) { }
471 0 0 if $xref > &getInputFileWeight
474 0 0 unless $tempRoot
488 0 0 if $readBytes =~ /^\s?(\d{10}) \d{5} n/
506 0 0 if ($readBytes =~ /^(xref$cr)/) { }
0 0 elsif ($readBytes =~ /^\d+\s+\d+\s+obj/) { }
527 0 0 if $buf =~ m[\/Root\s+(\d+)\s+\d+\s+R]
538 0 0 unless defined $GObjects{$index}
556 0 0 if ($objectContent =~ /^(\d+ \d+ obj\s*<<)(.+)(>>\s*stream)/s) { }
563 0 0 if $objectContent =~ /^(\d+ \d+ obj)\b/
579 0 0 unless &getPageSizeAndSetMediabox
587 0 0 if (alike($_, $Gpaper{'QuarterLetter'}))
588 0 0 if (alike($_, $Gpaper{'A6'}))
589 0 0 if (alike($_, $Gpaper{'HalfLetter'}))
590 0 0 if (alike($_, $Gpaper{'QuarterLegal'}))
591 0 0 if (alike($_, $Gpaper{'A5'}))
592 0 0 if (alike($_, $Gpaper{'HalfLegal'}))
593 0 0 if (alike($_, $Gpaper{'Letter'}))
594 0 0 if (alike($_, $Gpaper{'A4'}))
595 0 0 if (alike($_, $Gpaper{'Legal'}))
596 0 0 if (alike($_, $Gpaper{'Tabloid'}))
597 0 0 if (alike($_, $Gpaper{'A3'}))
608 0 0 if $hxw > $namedHxw + $tolerance or $hxw < $namedHxw - $tolerance
617 0 0 if $pagenumber > &getInputPageCount
625 0 0 unless $objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R]
662 0 0 unless $objectContent =~ m(/Kids\s*\[([^\]]+))
671 0 0 unless @pageObjBackup
674 0 0 if ($objectContent =~ m[/Count\s+(\d+)]) { }
675 0 0 if ($pageAccumulator + $1 < $pagenumber) { }
678 0 0 if $objectContent =~ m(/Kids\s*\[([^\]]+))
685 0 0 if $pageAccumulator == $pagenumber
699 0 0 unless $objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R]
701 0 0 unless $objectContent =~ /MediaBox/
705 0 0 unless (@GmediaBox)
707 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/) { }
711 0 0 if ($ref =~ /\[\s*([\S]+)\s+([\S]+)\s+([\S]+)\s+([\S]+)\s*\]/) { }
731 0 0 if ($objContent =~ m[/Contents\s+(\d+)]) { }
0 0 elsif ($objContent =~ m(/Contents\s*\[\s*(\d+)\s+\d+\s+R\s*\])) { }
747 0 0 if $objContent =~ /Resources\s+(\d+\s+\d+\s+R)/
748 0 0 if ($objContent =~ m[^.+/Resources]s)
755 0 0 if (/\S/)
757 0 0 if /<
758 0 0 if />>/
759 0 0 if $k == 0
771 0 0 if defined $maxPages
774 0 0 unless eval { do { $objectContent = getContentOfObjectNr($GrootNr); 1 } }
775 0 0 if ($objectContent =~ m[/Pages\s+(\d+)\s+\d+\s+R])
777 0 0 if $objectContent =~ m[/Count\s+(\d+)]
788 0 0 unless &getInputFileWeight
790 0 0 unless open $IN_FILE, "<", $GinFile
794 0 0 if $c ne "%PDF-"
798 0 0 unless $GrootNr > 0
811 0 0 unless $known
849 0 0 if exists $known{$1}
866 0 0 if $readBytes =~ /^(\d+)\s+(\d+)/
874 0 0 if $Gpos
879 0 0 unless open $OUT_FILE, ">", $outputfile