Branch Coverage

Bio/PrimarySeq.pm
Criterion Covered Total %
branch 121 130 93.0


line true false branch
207 6 14896 if (defined $id and defined $given_id)
208 0 6 if ($id ne $given_id)
212 11743 3159 if (defined $given_id)
215 13883 1019 if defined $id
216 651 14251 if $acc
217 232 14670 if defined $pid
220 11778 3124 if $alphabet
226 1 14901 if ($ref_to_seq) { }
229 14189 712 if (defined $seq)
235 916 13984 if $desc
236 27 14873 if $description
237 491 14409 if $ns
238 84 14816 if $auth
241 288 14612 if defined $v
242 0 14900 if defined $oid
243 18 14882 if defined $is_circular
267 140950 27381 if (scalar @args == 0)
272 27381 0 if (@args)
286 27210 172 if (not $self->{'_direct'} and defined $$seq_str_ref)
295 12806 14573 if $is_changed_seq
296 27377 2 unless exists $self->{'_freeze_length'}
302 18 27361 if ($alphabet) { }
15706 11655 elsif ($is_changed_seq or not defined $self->alphabet) { }
335 8 23101 if (defined $seqstr and not $seqstr =~ /^[$MATCHPATTERN]*$/)
337 3 5 if ($throw)
380 2 10041 if (defined $replace)
381 1 1 unless $self->validate_seq($replace)
385 52 9990 if (ref $start and $start->isa('Bio::LocationI')) { }
9990 0 elsif (defined $start and defined $end) { }
392 44 8 if ($loc->isa('Bio::Location::SplitLocationI'))
395 18 26 defined $loc->guide_strand ? :
396 9 35 $guide_strand == -1 ? :
401 9 43 $order == -1 ? :
407 1 119 if $nogap
411 101 19 defined $subloc->strand ? :
412 59 61 if ($strand < 0)
419 0 9990 if ($start > $end)
423 0 9990 if ($start <= 0)
431 1 9989 if (defined $replace) { }
438 1 9989 if ($end > $self->length)
439 1 0 if ($self->is_circular) { }
444 0 1 if (defined $replace) { }
457 3 9987 if $nogap
496 5 30701 if (defined $val)
498 1 4 if ($len and $len != $val)
534 13993 9745 if (defined $value)
566 654 246 if (defined $acc) { }
570 38 208 unless defined $acc
595 453 58 if (@_)
598 21 490 unless (defined $self->{'primary_id'})
624 27849 26893 if (defined $value)
626 0 27849 unless ($valid_type{$value})
653 1257 454 if @_
704 26 143382 if @_
745 292 3290 if (defined $value)
766 86 5 if (defined $value)
787 493 34 if (defined $value)
903 15779 2 if $alphabet
912 15771 3007 unless defined $nowarnonempty
920 2 18776 if ($total == 0)
921 1 1 unless ($nowarnonempty)
928 18776 2 unless (defined $alphabet)
929 1758 17018 if ($str =~ /[EFIJLOPQXZ]/i) { }
940 16011 1007 if ($str =~ tr/ACGKMNS-UWacgkmns-uw// / $total > 0.7) { }
941 53 15958 if ($str =~ /U/i) { }