Branch Coverage

Bio/Location/Split.pm
Criterion Covered Total %
branch 99 142 69.7


line true false branch
113 0 3696 if (defined $locations and ref($locations) =~ /array/i)
116 1 3695 if $seqid
167 6435 98096 unless defined $order
168 0 104531 if (defined $order and not $order =~ /^-?\d+$/)
171 0 104531 if $order > 1
172 0 104531 if $order < -1
173 97138 7393 defined $self->{'_sublocations'} ? :
176 104529 2 if $order == 0 or not @sublocs
185 0 2 if (not $self->seq_id and $seqid)
191 0 2 $seqid ? :
193 2 0 if (@locs)
194 1 1 if ($order == 1) { }
198 0 0 $a ? :
9 0 defined $a && defined $b ? :
202 5 0 defined $_->start ? :
207 0 0 $a ? :
6 0 defined $a && defined $b ? :
211 5 0 defined $_->end ? :
216 0 2 if ($seqid)
238 0 35750 unless (ref $loc and $loc->isa('Bio::LocationI'))
260 3703 214 if (defined $value or not defined $self->{'_splittype'})
261 0 3703 unless defined $value
291 0 0 unless $seqid
292 0 0 if (defined $loc->seq_id and $loc->seq_id ne $seqid)
313 3734 5531 if @_
320 5531 0 if ($self->isa('Bio::Location::SplitLocationI'))
324 53396 68 if $strand == $first_value
327 5483 48 if ($identical == scalar @subloc_strands) { }
361 1663 12594 if (defined $value) { }
377 41 124776 if (not $lstrand or $strand and $strand != $lstrand) { }
12586 112190 elsif (not $strand) { }
418 107 0 if ($self->isa('Bio::Location::SplitLocationI'))
422 328 16 if $strand == $first_value
425 95 12 if ($identical == scalar @subloc_strands) { }
448 0 36525 if (defined $value)
467 0 32829 if (defined $value)
487 0 36530 if (defined $value)
495 32834 3696 @locs ? :
511 0 4591 if (defined $value)
519 895 3696 @locs ? :
536 0 6 if (defined $value)
544 6 0 @locs ? :
560 0 510 if (defined $value)
578 507 3 $seqid ? :
583 1 509 if (@locs and not @same_id_locs)
588 1 0 $first_id ? :
591 510 0 @same_id_locs ? :
607 0 32834 if (defined $value)
625 32701 133 $seqid ? :
630 1 32833 if (@locs and not @same_id_locs)
635 1 0 $first_id ? :
638 32834 0 @same_id_locs ? :
655 0 6 if (defined $value)
673 2 4 $seqid ? :
678 1 5 if (@locs and not @same_id_locs)
683 1 0 $first_id ? :
686 6 0 @same_id_locs ? :
706 13 9 if (not defined $self->guide_strand) { }
718 6 3 if ($start > $end) { }
726 14 2 if ($switch == 0) { }
727 6 8 if ($subloc->start == 1) { }
741 6 0 if (scalar @end_seq_segments > 0 and @start_seq_segments > 0)
757 0 22 if ($length == 0)
781 3588 33757 if (@_ and not $self->is_remote)
783 35267 98 unless $subloc->is_remote
830 42 68 if ($strand < 0)
841 0 100 if (not $loc->is_remote and defined $self->seq_id and defined $loc->seq_id and $loc->seq_id ne $self->seq_id)
848 42 68 if $strand < 0
850 6 104 if (@strs == 1) { }
0 104 elsif (@strs == 0) { }
857 42 68 if ($strand < 0)