Branch Coverage

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


line true false branch
67 0 426 if ref $class
70 0 426 if (ref $pdf eq "ARRAY")
71 0 0 if scalar @$pdf > 1
75 0 426 if ref $class
79 192 234 if defined $parent
84 234 192 unless (defined $self->{'Parent'})
91 192 234 if defined $parent
167 0 192 if ($self->{'Count'}->realise->val <= $$page_number_ref)
174 12 0 if ($kid->{'Type'}->realise->val eq 'Page') { }
0 0 elsif ($result = $kid->realise->find_page_recursively($page_number_ref)) { }
175 12 0 if $$page_number_ref == 0
215 190 2 unless defined $page_number and $page_number <= $top->{'Count'}->val
218 190 2 if ($page_number == -1) { }
221 0 2 if $page_number < 0
226 12 180 if (defined $previous_page->{'Parent'}) { }
235 190 2 if ($page_number == -1) { }
241 2 0 if $parent->{'Kids'}{' val'}[$page_index] eq $previous_page
243 0 2 if $page_index == $parent_kid_count
264 0 192 if (scalar $parent->{'Kids'}->elements >= $max_kids_per_parent and $parent->{'Parent'} and $page_index < 0) { }
275 0 0 if $grandparent->{'Kids'}{' val'}[$new_parent_index] eq $self
278 0 0 if $new_parent_index > $grandparent_kid_count
284 190 2 if ($page_index < 0) { }
353 0 0 if ($kid->{'Type'}->val eq 'Pages') { }
378 242 452 if (defined $self->{$key}) { }
208 244 elsif (defined $self->{'Parent'}) { }
379 242 0 if (ref $self->{$key} and $self->{$key}->isa('PDF::Builder::Basic::PDF::Objind')) { }
424 0 0 if $dict and defined $dict->{'Font'} and defined $dict->{'Font'}{$name}
425 0 0 if (defined $self->{'Resources'}) { }
426 0 0 $dict ? :
435 0 0 if (ref $dict ne "HASH" and $dict->is_obj($pdf))
438 0 0 if (ref $resource ne "HASH" and $resource->is_obj($pdf))
466 0 0 if ($inherited)
470 0 0 unless $element->val == $bbox[$i++]
472 0 0 if $i == 4 and not $is_changed
501 192 234 if ($dict and defined $dict->{'ProcSet'})
506 0 192 if scalar @missing == 0
507 0 192 if defined $self->{'Resources'}
510 426 0 unless (defined $self->{'Resources'})
511 192 234 $dict ? :
514 426 0 unless defined $self->{'ProcSet'}
528 0 0 if (defined $parent)