Branch Coverage

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


line true false branch
50 0 306 if ref $class
53 0 306 if (ref $pdf eq "ARRAY")
54 0 0 if scalar @$pdf > 1
58 0 306 if ref $class
62 142 164 if defined $parent
67 164 142 unless (defined $self->{'Parent'})
75 142 164 if defined $parent
103 0 142 if ($self->{'Count'}->realise->val <= $$page_number_ref)
110 12 0 if ($kid->{'Type'}->realise->val eq 'Page') { }
0 0 elsif ($result = $kid->realise->find_page_recurse($page_number_ref)) { }
111 12 0 if $$page_number_ref == 0
135 140 2 unless defined $page_number and $page_number <= $top->{'Count'}->val
138 140 2 if ($page_number == -1) { }
142 0 2 if $page_number < 0
147 12 130 if (defined $previous_page->{'Parent'}) { }
157 140 2 if ($page_number == -1) { }
162 2 0 if $parent->{'Kids'}{' val'}[$page_index] eq $previous_page
164 0 2 if $page_index == $parent_kid_count
183 0 142 if (scalar $parent->{'Kids'}->elements >= $max_kids_per_parent and $parent->{'Parent'} and $page_index < 1) { }
190 0 0 if $grandparent->{'Kids'}{' val'}[$new_parent_index] eq $self
193 0 0 if $new_parent_index > $grandparent_kid_count
200 140 2 if ($page_index < 0) { }
238 0 0 if ($kid->{'Type'}->val eq 'Pages') { }
258 225 351 if (defined $self->{$prop}) { }
167 184 elsif (defined $self->{'Parent'}) { }
259 225 0 if (ref $self->{$prop} and $self->{$prop}->isa('PDF::API2::Basic::PDF::Objind')) { }
287 0 0 if $dict and defined $dict->{'Font'} and defined $dict->{'Font'}{$name}
289 0 0 if (defined $self->{'Resources'}) { }
290 0 0 $dict ? :
300 0 0 if (ref $dict ne "HASH" and $dict->is_obj($pdf))
303 0 0 if (ref $resource ne "HASH" and $resource->is_obj($pdf))
324 0 0 if ($inherited)
328 0 0 unless $element->val == $bbox[$i++]
330 0 0 if $i == 4 and not $is_changed
353 142 164 if ($dict and defined $dict->{'ProcSet'})
358 0 142 if scalar @missing == 0
359 0 142 if defined $self->{'Resources'}
362 306 0 unless (defined $self->{'Resources'})
363 142 164 $dict ? :
366 306 0 unless defined $self->{'ProcSet'}
380 0 0 if (defined $parent)