| line |
true |
false |
branch |
|
69
|
0 |
1543 |
if ref $class |
|
84
|
24 |
0 |
if (scalar @_) |
|
86
|
0 |
24 |
ref $type ? : |
|
88
|
0 |
24 |
unless exists $self->{'Type'} |
|
109
|
0 |
9 |
ref $_ ? : |
|
131
|
1 |
1050 |
if (defined $self->{' stream'} or defined $self->{' streamfile'} or defined $self->{' streamloc'}) |
|
132
|
8 |
111 |
if ($self->{'Filter'} and $self->{' nofilt'}) { } |
|
|
10 |
101 |
elsif ($self->{'Filter'} or not defined $self->{' stream'}) { } |
|
135
|
10 |
0 |
unless defined $self->{'Length'} |
|
136
|
10 |
0 |
unless $self->{'Length'}->is_obj($pdf) |
|
144
|
58 |
22840 |
$b eq 'Subtype' ? : |
|
|
69 |
22898 |
$a eq 'Subtype' ? : |
|
|
584 |
22967 |
$b eq 'Type' ? : |
|
|
711 |
23551 |
$a eq 'Type' ? : |
|
147
|
6192 |
3080 |
if $key =~ /^[\s\-]/o |
|
148
|
0 |
3080 |
unless $self->{$key} |
|
158
|
0 |
1169 |
if (defined $self->{' streamloc'} and not defined $self->{' stream'}) |
|
165
|
10 |
0 |
if (not $self->{' nofilt'} and defined $self->{'Filter'} and defined $self->{' stream'} || defined $self->{' streamfile'}) |
|
170
|
0 |
10 |
if ($filter eq 'LZWDecode') { } |
|
|
9 |
1 |
elsif ($filter eq 'FlateDecode') { } |
|
171
|
0 |
0 |
if ($hasflate < -1) |
|
183
|
0 |
10 |
if $hasflate > -1 |
|
186
|
118 |
1051 |
if (defined $self->{' stream'}) { } |
|
|
1 |
1050 |
elsif (defined $self->{' streamfile'}) { } |
|
190
|
111 |
7 |
unless ($self->{' nofilt'}) |
|
199
|
0 |
1 |
unless open my $dictfh, '<', $self->{' streamfile'} |
|
206
|
0 |
1 |
unless ($self->{' nofilt'}) |
|
214
|
0 |
1 |
unless ($self->{' nofilt'}) |
|
224
|
119 |
1050 |
if (defined $self->{' stream'} or defined $self->{' streamfile'}) |
|
226
|
10 |
109 |
unless ($self->{'Length'}{'val'} == $length) |
|
228
|
10 |
0 |
if $self->{'Length'}->is_obj($pdf) |
|
256
|
3 |
4 |
if (defined $self->{'Filter'}) |
|
260
|
0 |
0 |
do {
$self->{'DecodeParms'}->isa('PDF::Builder::Basic::PDF::Array')
} ? : |
|
|
0 |
0 |
do {
$self->{'DecodeParms'}->isa('PDF::Builder::Basic::PDF::Dict') if $self->{'Filter'}->isa('PDF::Builder::Basic::PDF::Name')
} ? : |
|
|
0 |
3 |
$self->{'DecodeParms'} ? : |
|
262
|
0 |
0 |
if $self->{'Filter'}->isa('PDF::Builder::Basic::PDF::Name') |
|
275
|
0 |
7 |
if (defined $self->{' streamfile'}) |
|
285
|
7 |
0 |
if ($i + $readlen > $len) { } |
|
297
|
0 |
7 |
if (not $force_memory || defined $self->{' streamfile'} and length($self->{' stream'}) + length($data) > $mincache) |
|
306
|
0 |
7 |
if (defined $self->{' streamfile'}) { } |
|
313
|
0 |
7 |
if defined $self->{' streamfile'} |