Branch Coverage

Bio/LiveSeq/SeqI.pm
Criterion Covered Total %
branch 81 184 44.0


line true false branch
111 543 0 if ($self->strand == 1) { }
134 822 0 if ($self->strand == 1) { }
173 21 37 if (defined $unsecuremode and $unsecuremode eq 'unsecuremoderequested') { }
175 5 16 unless ($start)
178 13 8 if ($end) { }
179 2 11 if ($end == $start) { }
186 7 1 unless ($length)
191 37 0 if ($start)
192 0 37 unless ($self->{'seq'}->valid($start))
196 31 6 if ($end)
197 0 31 if ($end == $start) { }
201 0 31 unless ($self->{'seq'}->valid($end))
204 0 31 unless ($self->follows($start, $end) == 1)
211 58 0 if ($self->strand == 1) { }
269 0 0 if (defined $length)
270 0 0 if ($length < 1)
275 0 0 if (not defined $pos1) { }
279 0 0 if ($pos1 == 0)
283 0 0 if (defined $pos2 and $pos1 > $pos2)
292 0 0 if ($startlabel < 1)
296 0 0 if (not defined $pos2) { }
298 0 0 unless (defined $length)
302 0 0 if ($pos2 == 0)
307 0 0 if (defined $pos1 and $pos1 > $pos2)
316 0 0 if ($endlabel < 1)
322 0 0 if ($strand == 1) { }
346 216 0 if ($strand == 1) { }
375 6 1 if (defined $value)
400 6 6 if (defined $value)
403 0 12 if (not exists $self->{'accession_number'}) { }
430 0 0 if (defined $value)
433 0 0 if (not exists $self->{'primary_id'}) { }
478 0 0 unless ($position)
483 0 0 unless ($label > 0)
507 0 5 unless ($self->valid($label))
508 0 0 if ($self->{'seq'}->valid($label)) { }
517 0 5 unless ($newseq)
518 0 0 if (defined $length) { }
519 0 0 unless ($length >= 0)
530 5 0 if (defined $length) { }
531 0 5 unless ($length >= 0)
538 0 5 if ($length == 0)
540 0 0 if ($insertbegin == -1) { }
546 5 0 if ($newseqlength == $length)
552 0 0 unless ($afterendlabel > 0)
557 0 0 if ($deleted eq -1) { }
561 0 0 if ($insertbegin == -1) { }
578 0 0 if ($strand == 1) { }
585 0 0 if ($insertbegin == 0 or $insertend == 0) { }
600 0 0 unless ($endlabel > 0)
607 0 0 if ($strand == 1) { }
630 5 0 if ($length == 1) { }
634 0 0 unless ($endlabel > 0)
638 0 0 if ($length == 2) { }
663 0 5 if ($strand == -1)
672 0 5 if ($errorcheck != $length) { }
697 68 108497 if ($label == $checkme)
748 0 1882 if ($strand)
749 0 0 if ($strand != 1 and $strand != -1) { }
774 34 57 if (defined $value)
775 5 29 if $value =~ /dna/i
776 7 27 if $value =~ /rna/i
777 0 34 unless ($valid_type{$value})
804 5 23 if ($label)
805 5 0 if ($self->valid($label)) { }
812 9 19 if ($coord_start) { }
844 4 15 unless (defined $firstlabel)
847 0 19 unless ($position)
851 19 0 unless (defined $strand)
854 19 0 if ($strand == 1) { }
855 9 10 if ($position > 0) { }
861 0 0 if ($position > 0) { }
891 5 0 unless (defined $strand)
894 5 0 unless (defined $firstlabel)
897 0 5 unless ($self->valid($label))
901 0 5 if ($firstlabel == $label)
908 0 5 if ($position <= 0)
911 0 5 if ($strand == -1) { }
943 37 92 unless (defined $strand)
946 129 0 if ($strand == 1) { }
1059 33 41 if (defined $value)
1062 0 74 if (not exists $self->{'gene'}) { }
1082 0 1642 unless ($self->{'seq'}->valid($self->start) and $self->{'seq'}->valid($self->end))
1102 0 0 if (defined $value)
1105 0 0 if (not exists $self->{'name'}) { }
1126 23 3 if (defined $value)
1129 0 26 if (not exists $self->{'desc'}) { }
1150 6 1 if (defined $value)
1153 0 7 if (not exists $self->{'source'}) { }
1169 67 12975 if (index(ref $value, 'LiveSeq') != -1) { }
12851 124 elsif (index(ref $value, 'ARRAY') != -1) { }
0 124 elsif (index(ref $value, 'HASH') != -1) { }