Branch Coverage

Bio/Variation/DNAMutation.pm
Criterion Covered Total %
branch 70 102 68.6


line true false branch
145 29 2 if $start
146 29 2 if $end
147 20 11 if $length
148 0 31 if $strand
149 0 31 if $primary
150 0 31 if $source
151 0 31 if $frame
152 0 31 if $score
153 0 31 if $gff_string
155 0 31 if $allele_ori
156 0 31 if $allele_mut
157 17 14 if $upstreamseq
158 17 14 if $dnstreamseq
160 0 31 if $label
161 0 31 if $status
162 17 14 if $proof
163 0 31 if $region
164 0 31 if $region_value
165 0 31 if $region_dist
166 0 31 if $numbering
167 18 13 if $mut_number
168 8 23 if $ismutation
170 0 31 if $cpg
192 0 19 if (defined $value) { }
0 19 elsif (not defined $obj->{'label'}) { }
193 0 0 $value ? :
208 0 0 if ($self->allele_ori eq $self->allele_mut and length $self->allele_ori == 1) { }
215 0 0 if ($self->allele_ori eq 'c' and substr($self->upStreamSeq, 0, 1) eq 'g' or $self->allele_ori eq 'g' and substr($self->dnStreamSeq, -1, 1) eq 'c') { }
243 21 0 if (defined $value)
244 0 21 if (not $value->isa('Bio::Variation::RNAChange')) { }
252 21 0 if (exists $self->{'RNAChange'}) { }
283 78 12 if $self->allele_ori and $self->allele_ori->seq
284 78 12 if $self->allele_mut and $self->allele_mut->seq
286 0 90 if (not $o || $m) { }
60 30 elsif ($o and $m and length $o == length $m and length $o == 1) { }
12 18 elsif (not $o) { }
12 6 elsif (not $m) { }
317 0 60 if ($o eq $m) { }
31 29 elsif ($transition{$o} eq $m) { }
347 0 17 if (defined $value) { }
350 0 17 unless defined $self->start
356 17 0 if ($self->SeqDiff)
357 4 13 if ($self->SeqDiff and $self->SeqDiff->alphabet and $self->SeqDiff->alphabet eq 'dna') { }
13 0 elsif ($self->SeqDiff->alphabet and $self->SeqDiff->alphabet eq 'rna') { }
365 15 2 if ($self->isMutation) { }
371 2 15 if $self->start < 1
378 2 15 if $self->label =~ /deletion/
379 2 15 if $self->label =~ /insertion/
380 15 2 if $self->allele_ori->seq
387 14 4 if $self->label =~ /point/ or $self->label =~ /complex/
388 16 2 if $self->allele_mut->seq