line |
true |
false |
branch |
110
|
0 |
0 |
unless defined $input |
112
|
0 |
0 |
if print STDERR "$sayHelp" |
|
0 |
0 |
if ($input =~ /^-h$/ or $input =~ /^--help$/) |
114
|
0 |
0 |
if print STDERR "$sayVersion\n" |
|
0 |
0 |
if ($input =~ /^-v$/ or $input =~ /^--version$/) |
116
|
0 |
0 |
unless -r $input |
119
|
0 |
0 |
if $num_pag_input == 0 |
124
|
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') { } |
140
|
0 |
0 |
$pagesPerSheet == 4 ? : |
143
|
0 |
0 |
unless $_ % $pagesPerSheet > 0 or $numPagImposed == 0 |
145
|
0 |
0 |
if $target_page > $num_pag_input |
147
|
0 |
0 |
$_ % 4 > 1 ? : |
151
|
0 |
0 |
if $numPagImposed == $num_pag_input |
164
|
0 |
0 |
unless $Gpos |
165
|
0 |
0 |
if defined $Gstream and length $Gstream > 0 |
178
|
0 |
0 |
unless $Gpos |
180
|
0 |
0 |
unless my $pagenumber = $param->{'page'} |
181
|
0 |
0 |
unless my $x = $param->{'x'} |
182
|
0 |
0 |
unless my $y = $param->{'y'} |
183
|
0 |
0 |
unless my $rotate = $param->{'rotate'} |
189
|
0 |
0 |
unless defined $refNr |
190
|
0 |
0 |
unless $refNr |
192
|
0 |
0 |
if (defined $x and defined $y and defined $rotate) { } |
220
|
0 |
0 |
if (%GpageXObject) |
235
|
0 |
0 |
if (exists $Gresources{$resourceDict}) { } |
239
|
0 |
0 |
if (keys %Gresources < 10) |
278
|
0 |
0 |
unless ($Gparents[0]) |
287
|
0 |
0 |
if $Gcounts[0] > 9 |
295
|
0 |
0 |
unless $Gpos |
297
|
0 |
0 |
if $Gstream |
329
|
0 |
0 |
unless ($Gparents[$j]) |
360
|
0 |
0 |
defined $Gparents[0] ? : |
362
|
0 |
0 |
if (defined $Gparents[$i]) |
366
|
0 |
0 |
if ($Gparents[$j]) |
398
|
0 |
0 |
if ($rotate) |
417
|
0 |
0 |
if $buf =~ /Encrypt/o |
419
|
0 |
0 |
if ($buf =~ /\bstartxref\s+(\d+)/o) |
422
|
0 |
0 |
if $xref > (stat $GinFile)[7] |
426
|
0 |
0 |
unless $tempRoot |
444
|
0 |
0 |
if ($incoming_line =~ /^\s?(\d+) \d+ (\w)\s*/o) |
445
|
0 |
0 |
unless $2 ne "n" or exists $GoldObject{$i} |
454
|
0 |
0 |
if $buf =~ m[\/Root\s+(\d+)\s{1,2}\d+\s{1,2}R]so |
455
|
0 |
0 |
if $rooty |
467
|
0 |
0 |
unless defined $GoldObject{$index} |
487
|
0 |
0 |
if ($elObje =~ /^(\d+ \d+ obj\s*<<)(.+)(>>\s*stream)/so) { } |
494
|
0 |
0 |
if $elObje =~ /^(\d+ \d+ obj\s*)/so |
513
|
0 |
0 |
if ($elObje =~ m[/Pages\s+(\d+)\s{1,2}\d+\s{1,2}R]so) { } |
521
|
0 |
0 |
unless defined $GformBox[2] and defined $GformBox[3] |
526
|
0 |
0 |
if ($multi > 119780 and $multi < 121780) |
531
|
0 |
0 |
if ($multi > 123443 and $multi < 125443) |
536
|
0 |
0 |
if ($multi > 152720 and $multi < 154720) |
541
|
0 |
0 |
if ($multi > 241352 and $multi < 243352) |
546
|
0 |
0 |
if ($multi > 248305 and $multi < 250305) |
551
|
0 |
0 |
if ($multi > 307448 and $multi < 309448) |
556
|
0 |
0 |
if ($multi > 483704 and $multi < 485704) |
559
|
0 |
0 |
if ($multi > 499395 and $multi < 501395) |
562
|
0 |
0 |
if ($multi > 615896 and $multi < 617896) |
582
|
0 |
0 |
if ($elObje =~ m[/Pages\s+(\d+)\s{1,2}\d+\s{1,2}R]so) { } |
627
|
0 |
0 |
if ($elObje =~ m(/Kids\s*\[([^\]]+))so) { } |
641
|
0 |
0 |
if ($elObje =~ m[/Count\s+(\d+)]so) { } |
642
|
0 |
0 |
if ($pageAccumulator + $1 < $pagenumber) { } |
645
|
0 |
0 |
if $elObje =~ m(/Kids\s*\[([^\]]+))so |
652
|
0 |
0 |
if $pageAccumulator == $pagenumber |
666
|
0 |
0 |
unless (@GformBox) |
667
|
0 |
0 |
if ($obj =~ /MediaBox\s*\[\s*([\S]+)\s+([\S]+)\s+([\S]+)\s+([\S]+)\s*\]/so) |
672
|
0 |
0 |
if ($obj =~ m[/Contents\s+(\d+)]so) { } |
|
0 |
0 |
elsif ($obj =~ m(/Contents\s*\[\s*(\d+)\s{1,2}\d+\s{1,2}R\s*\])so) { } |
690
|
0 |
0 |
if ($obj =~ m[^(.+/Resources)]so) |
691
|
0 |
0 |
if ($obj =~ /Resources(\s+\d+\s{1,2}\d+\s{1,2}R)/so) { } |
699
|
0 |
0 |
if (/\S/s) |
701
|
0 |
0 |
if /<
|
702
|
0 |
0 |
if />>/s |
703
|
0 |
0 |
if $k == 0 |
718
|
0 |
0 |
unless open $IN_FILE, "<", $GinFile |
729
|
0 |
0 |
unless eval {
do {
$elObje = getObject($Groot);
1
}
} |
730
|
0 |
0 |
if ($elObje =~ m[/Pages\s+(\d+)\s{1,2}\d+\s{1,2}R]so) |
732
|
0 |
0 |
if $elObje =~ m[/Count\s+(\d+)]so |
751
|
0 |
0 |
unless $_ =~ /^xref/o |
762
|
0 |
0 |
if exists $Gold{$1} |
782
|
0 |
0 |
if ($incoming_line =~ /^(\d+)\s+(\d+)/o) |
794
|
0 |
0 |
if $Gpos |
799
|
0 |
0 |
unless open $OUT_FILE, ">", $outputfile |