Branch Coverage

blib/lib/PDF/Builder/Basic/PDF/Pages.pm
Criterion Covered Total %
branch 39 82 47.5


line true false branch
62 0 411 if ref $class
65 0 411 if (ref $pdf eq "ARRAY")
66 0 0 if scalar @$pdf > 1
70 0 411 if ref $class
74 194 217 if defined $parent
79 217 194 unless (defined $self->{'Parent'})
86 194 217 if defined $parent
150 0 194 if ($self->{'Count'}->realise->val <= $$page_number_ref)
157 12 0 if ($kid->{'Type'}->realise->val eq 'Page') { }
0 0 elsif ($result = $kid->realise->find_page_recursively($page_number_ref)) { }
158 12 0 if $$page_number_ref == 0
192 192 2 unless defined $page_number and $page_number <= $top->{'Count'}->val
195 192 2 if ($page_number == -1) { }
198 0 2 if $page_number < 0
203 12 182 if (defined $previous_page->{'Parent'}) { }
212 192 2 if ($page_number == -1) { }
218 2 0 if $parent->{'Kids'}{' val'}[$page_index] eq $previous_page
220 0 2 if $page_index == $parent_kid_count
241 0 194 if (scalar $parent->{'Kids'}->elements >= $max_kids_per_parent and $parent->{'Parent'} and $page_index < 1) { }
252 0 0 if $grandparent->{'Kids'}{' val'}[$new_parent_index] eq $self
255 0 0 if $new_parent_index > $grandparent_kid_count
261 192 2 if ($page_index < 0) { }
318 0 0 if ($kid->{'Type'}->val eq 'Pages') { }
337 245 438 if (defined $self->{$key}) { }
211 227 elsif (defined $self->{'Parent'}) { }
338 245 0 if (ref $self->{$key} and $self->{$key}->isa('PDF::Builder::Basic::PDF::Objind')) { }
377 0 0 if $dict and defined $dict->{'Font'} and defined $dict->{'Font'}{$name}
378 0 0 if (defined $self->{'Resources'}) { }
379 0 0 $dict ? :
388 0 0 if (ref $dict ne "HASH" and $dict->is_obj($pdf))
391 0 0 if (ref $resource ne "HASH" and $resource->is_obj($pdf))
413 0 0 if ($inherited)
417 0 0 unless $element->val == $bbox[$i++]
419 0 0 if $i == 4 and not $is_changed
442 194 217 if ($dict and defined $dict->{'ProcSet'})
447 0 194 if scalar @missing == 0
448 0 194 if defined $self->{'Resources'}
451 411 0 unless (defined $self->{'Resources'})
452 194 217 $dict ? :
455 411 0 unless defined $self->{'ProcSet'}
469 0 0 if (defined $parent)