| line |
true |
false |
branch |
|
80
|
0 |
2066 |
if ref $class
|
|
101
|
27 |
0 |
if (scalar @_)
|
|
103
|
0 |
27 |
ref $type ? :
|
|
105
|
0 |
27 |
unless exists $self->{'Type'}
|
|
134
|
0 |
14 |
ref $_ ? :
|
|
162
|
1 |
1478 |
if (defined $self->{' stream'} or defined $self->{' streamfile'} or defined $self->{' streamloc'})
|
|
163
|
10 |
154 |
if ($self->{'Filter'} and $self->{' nofilt'}) { }
|
|
|
14 |
140 |
elsif ($self->{'Filter'} or not defined $self->{' stream'}) { }
|
|
166
|
14 |
0 |
unless defined $self->{'Length'}
|
|
167
|
14 |
0 |
unless $self->{'Length'}->is_obj($pdf)
|
|
175
|
64 |
35168 |
$b eq 'Subtype' ? :
|
|
|
101 |
35232 |
$a eq 'Subtype' ? :
|
|
|
804 |
35333 |
$b eq 'Type' ? :
|
|
|
988 |
36137 |
if ($a eq 'Type') { }
|
|
178
|
9239 |
4296 |
if $key =~ /^[\s\-]/o
|
|
179
|
0 |
4296 |
unless $self->{$key}
|
|
181
|
0 |
4296 |
unless $self->{$key} =~ /^PDF::Builder/
|
|
191
|
0 |
1642 |
if (defined $self->{' streamloc'} and not defined $self->{' stream'})
|
|
198
|
14 |
0 |
if (not $self->{' nofilt'} and defined $self->{'Filter'} and defined $self->{' stream'} || defined $self->{' streamfile'})
|
|
203
|
0 |
14 |
if ($filter eq 'LZWDecode') { }
|
|
|
13 |
1 |
elsif ($filter eq 'FlateDecode') { }
|
|
204
|
0 |
0 |
if ($hasflate < -1)
|
|
216
|
0 |
14 |
if $hasflate > -1
|
|
219
|
163 |
1479 |
if (defined $self->{' stream'}) { }
|
|
|
1 |
1478 |
elsif (defined $self->{' streamfile'}) { }
|
|
223
|
154 |
9 |
unless ($self->{' nofilt'})
|
|
232
|
0 |
1 |
unless open my $dictfh, "<", $self->{' streamfile'}
|
|
239
|
0 |
1 |
unless ($self->{' nofilt'})
|
|
247
|
0 |
1 |
unless ($self->{' nofilt'})
|
|
257
|
164 |
1478 |
if (defined $self->{' stream'} or defined $self->{' streamfile'})
|
|
259
|
14 |
150 |
unless ($self->{'Length'}{'val'} == $length)
|
|
261
|
14 |
0 |
if $self->{'Length'}->is_obj($pdf)
|
|
295
|
3 |
4 |
if (defined $self->{'Filter'})
|
|
299
|
0 |
0 |
do {
|
|
|
0 |
0 |
do {
|
|
|
0 |
3 |
$self->{'DecodeParms'} ? :
|
|
301
|
0 |
0 |
if $self->{'Filter'}->isa("PDF::Builder::Basic::PDF::Name")
|
|
314
|
0 |
7 |
if (defined $self->{' streamfile'})
|
|
324
|
7 |
0 |
if ($i + $readlen > $len) { }
|
|
336
|
0 |
7 |
if (not $force_memory || defined $self->{' streamfile'} and length($self->{' stream'}) + length($data) > $mincache)
|
|
345
|
0 |
7 |
if (defined $self->{' streamfile'}) { }
|
|
352
|
0 |
7 |
if defined $self->{' streamfile'}
|