line |
true |
false |
branch |
247
|
0 |
0 |
unless ($root) |
277
|
0 |
0 |
if (ref $fname) { } |
280
|
0 |
0 |
if ($update) |
289
|
0 |
0 |
unless -f $fname |
292
|
0 |
0 |
if ($update) |
302
|
0 |
0 |
unless ($buf =~ /^\%PDF\-1\.\d+\s*$cr/mo) |
312
|
0 |
0 |
if ($buf =~ /startxref($cr|\s*)\d+($cr|\s*)\%\%eof.*?/io) |
317
|
0 |
0 |
unless ($buf =~ /startxref[^\d]+([0-9]+)($cr|\s*)\%\%eof.*?/io) |
356
|
0 |
0 |
unless ref $self |
361
|
0 |
0 |
if (UNIVERSAL::can($item, 'release')) { } |
|
0 |
0 |
elsif (ref $item eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $item eq 'HASH') { } |
392
|
0 |
0 |
unless $$self{' update'} |
406
|
0 |
0 |
if (defined $$self{' newroot'}) { } |
413
|
0 |
0 |
unless defined $$tdict{$t} |
455
|
0 |
0 |
if (ref $fname) { } |
482
|
0 |
0 |
if defined $$self{'Info'} |
483
|
0 |
0 |
defined $$self{' newroot'} && $$self{' newroot'} ne '' ? : |
490
|
0 |
0 |
if $$self{' loc'} |
491
|
0 |
0 |
if ($$self{' update'}) |
494
|
0 |
0 |
unless defined $$tdict{$t} |
502
|
0 |
0 |
if $^O eq 'MacOS' and not ref $$self{' fname'} |
527
|
0 |
0 |
if ($str =~ /^<
|
|
0 |
0 |
elsif ($str =~ /^([0-9]+)$ws_char+([0-9]+)$ws_char+R/so) { } |
|
0 |
0 |
elsif ($str =~ /^([0-9]+)$ws_char+([0-9]+)$ws_char+obj/so) { } |
|
0 |
0 |
elsif ($str =~ m[^/($reg_char+)]so) { } |
|
0 |
0 |
elsif ($str =~ /^\(/o) { } |
|
0 |
0 |
elsif ($str =~ /^
|
|
0 |
0 |
elsif ($str =~ /^\[/o) { } |
|
0 |
0 |
elsif ($str =~ /^(true|false)$irreg_char/o) { } |
|
0 |
0 |
elsif ($str =~ /^([+-.0-9]+)$irreg_char/o) { } |
|
0 |
0 |
elsif ($str =~ /^null$irreg_char/o) { } |
535
|
0 |
0 |
if ($str =~ s[^/($reg_char+)][]o) { } |
|
0 |
0 |
elsif ($str =~ s[^/$ws_char+][]o) { } |
|
0 |
0 |
elsif ($str =~ s[^//][/]o) { } |
561
|
0 |
0 |
if ($str =~ s/^stream(?:(?:\015\012)|\012|\015)//o and $$res{'Length'}->val != 0) |
567
|
0 |
0 |
unless ($opts{'nostreams'}) |
569
|
0 |
0 |
if ($k > length $str) { } |
588
|
0 |
0 |
if defined $$res{'Type'} and defined $types{$$res{'Type'}->val} |
598
|
0 |
0 |
unless ($res = $self->test_obj($k, $value)) |
617
|
0 |
0 |
if ($res = $self->test_obj($k, $value)) { } |
649
|
0 |
0 |
if ($str =~ /^(\\[()])/o) { } |
|
0 |
0 |
elsif ($str =~ /^\)/o) { } |
|
0 |
0 |
elsif ($str =~ /^\(/o) { } |
663
|
0 |
0 |
if ($nested == 0) |
679
|
0 |
0 |
unless $fh->read($str, 255, length $str) |
749
|
0 |
0 |
unless $objind eq $res |
788
|
0 |
0 |
if (defined $$self{' free'} and scalar @{$$self{' free'};} > 0) |
791
|
0 |
0 |
if (defined $base) { } |
808
|
0 |
0 |
defined $i ? : |
812
|
0 |
0 |
unless (defined $self->locate_obj($i, $ng)) |
814
|
0 |
0 |
if (defined $base) { } |
834
|
0 |
0 |
if (defined $base) { } |
864
|
0 |
0 |
unless (exists $$self{' outlist_cache'}{$obj}) |
905
|
0 |
0 |
if $$self{' objcache'}{join $;, $$objind{' objnum'}, $$objind{' objgen'}} eq $objind |
928
|
0 |
0 |
unless defined($fh = $$self{' OUTFILE'}) |
931
|
0 |
0 |
unless scalar @objs > 0 |
934
|
0 |
0 |
unless $objind->is_obj($self) |
938
|
0 |
0 |
if ($$self{' outlist'}[$i] eq $objind) |
944
|
0 |
0 |
if $j < 0 |
947
|
0 |
0 |
if grep {$_ eq $objind;} @{$$self{' free'};} |
949
|
0 |
0 |
if $$objind{' comments'} |
958
|
0 |
0 |
unless (exists $$self{' printed_cache'}{$objind}) |
980
|
0 |
0 |
unless defined $$out{$i} |
988
|
0 |
0 |
unless $nt eq 'n' |
990
|
0 |
0 |
if ($nl < $minl or $mini == 0) |
996
|
0 |
0 |
unless ($obj = $self->test_obj($i, $ng)) |
1006
|
0 |
0 |
defined $filt ? : |
1007
|
0 |
0 |
unless not $res or $res->is_obj($out) |
1014
|
0 |
0 |
if ($obj->isa('PDF::API3::Compat::API2::Basic::PDF::Dict') and $$obj{'Linearized'}) |
1042
|
0 |
0 |
if (ref $$tdict{' xref'}{$num}) |
1045
|
0 |
0 |
if ($$ref[1] == $gen) |
1047
|
0 |
0 |
if $$ref[2] eq 'n' |
1068
|
0 |
0 |
if $readDebug |
1069
|
0 |
0 |
if ($instream) { } |
1075
|
0 |
0 |
if $readDebug |
1082
|
0 |
0 |
if $readDebug |
1088
|
0 |
0 |
if $readDebug |
1101
|
0 |
0 |
if $readDebug |
1102
|
0 |
0 |
if ($instream) { } |
1108
|
0 |
0 |
if $readDebug |
1115
|
0 |
0 |
if $readDebug |
1122
|
0 |
0 |
if $readDebug |
1194
|
0 |
0 |
unless ($buf =~ /^xref$cr/io) |
1218
|
0 |
0 |
unless exists $$xlist{$xmin} |
1223
|
0 |
0 |
unless ($buf =~ /^\s*trailer\b/io) |
1231
|
0 |
0 |
if $xmin > $$self{' maxobj'} |
1232
|
0 |
0 |
if defined $$tdict{'Prev'} and $$tdict{'Prev'}->val != 0 |
1234
|
0 |
0 |
unless defined $$tdict{' prev'} |
1273
|
0 |
0 |
unless ($update) |
1305
|
0 |
0 |
if ($i > $#xreflist or $$self{' objects'}{$xreflist[$i]->uid}[0] != $j + 1) { } |
1307
|
0 |
0 |
$first == -1 ? : |
1308
|
0 |
0 |
if ($first == -1) |
1310
|
0 |
0 |
defined $freelist[$k] ? : |
1316
|
0 |
0 |
if (defined $freelist[$k] and defined $xref and "$freelist[$k]" eq "$xref") { } |
1319
|
0 |
0 |
defined $freelist[$k] ? : |
1332
|
0 |
0 |
if $i < scalar @xreflist |
1370
|
0 |
0 |
if $$self{' loc'} |
1373
|
0 |
0 |
if (defined $$self{' newroot'}) { } |
1380
|
0 |
0 |
unless defined $$tdict{$t} |
1392
|
0 |
0 |
unless scalar @objs > 0 |
1395
|
0 |
0 |
unless $objind->is_obj($self) |
1399
|
0 |
0 |
if ($$self{' outlist'}[$i] eq $objind) |
1405
|
0 |
0 |
if $j < 0 |
1408
|
0 |
0 |
if grep {$_ eq $objind;} @{$$self{' free'};} |
1417
|
0 |
0 |
unless (exists $$self{' printed_cache'}{$objind}) |