Branch Coverage

blib/lib/Piper/Instance.pm
Criterion Covered Total %
branch 78 84 92.8


line true false branch
136 22 13 $self->has_parent ? :
213 208 190 if ($self->has_children) { }
215 157 110 if $child->has_pending
304 161 31 unless (exists $cache->{$location})
306 159 2 if ($self->has_children or $self->has_parent) { }
307 80 79 $self->has_children ? :
318 1 1 "$self" eq "$location" ? :
320 159 2 if defined $cache->{$location}
323 187 5 if defined $cache->{$location}
350 9 15 $self->prepare ? :
372 0 12 unless $self->has_parent
384 14 732 if ($self->has_children) { }
426 4 1 if ($self->has_parent) { }
458 4 1 if ($self->has_parent) { }
478 2 3 unless defined $segment
494 2 3 unless defined $segment
548 10 0 if ($self->has_parent) { }
568 0 7 unless $self->has_children
589 12 11 if ($self->has_parent) { }
610 0 8 unless $self->has_children
613 4 8 if (defined $self->children->[$index + 1]) { }
638 22 13 if ($self->has_parent) { }
673 8 15 if ($self->has_children) { }
710 0 554 unless $self->has_children
714 206 348 if $referrer
717 174 380 if $path and not ref $path
718 554 0 $path ? :
721 62 669 if (not $descend->has_children) { }
348 321 elsif (exists $descend->directory->{$pieces[0]}) { }
735 358 196 if (not defined $descend and $referrer ne $self)
738 79 491 if ($child eq $referrer)
742 133 358 if ($child->has_children)
744 24 109 if defined $potential
748 24 334 if (@possible)
755 334 220 if (not defined $descend and $referrer ne $self)
757 134 200 if ($path =~ m[^\Q$overlap\E(?:$|/(?.*))])
759 117 17 $path ? :
760 117 17 $path ? :
776 79 453 if ($self->has_children) { }
780 233 220 $self->pending ? :
794 166 117 if ($self->has_children) { }
797 148 18 if ($best = &last_value(sub { $_->pressure >= 100; } , @{$self->children;})) { }