Branch Coverage

blib/lib/Bio/CUA/Summarizer.pm
Criterion Covered Total %
branch 27 72 37.5


line true false branch
21 4 0 if ($@) { }
113 0 3 unless $tag eq 'codon_table'
114 0 3 if (ref $val) { }
3 0 elsif ($val =~ /^\d+$/) { }
116 0 0 unless $val->isa($codonPkg)
121 0 3 unless $codonTable = $codonPkg->new(-'id', $val)
125 0 0 unless $codonTable = $codonPkg->new(-'map_file', $val)
148 0 249 unless my $table = $_[0]{'_codon_table'}
163 1 0 wantarray ? :
186 5 52 unless ($ref)
189 0 5 if ($input =~ /^[ATGCUN]+$/ and not -f $input) { }
198 0 52 if ($ref eq 'HASH') { }
229 0 6 unless my $seqIO = $self->_get_seq_io($input)
232 0 6 if ($each) { }
253 0 6 unless keys %list
271 0 0 unless my $codonList = $self->tabulate_codons($input)
274 0 0 if ($each) { }
280 0 0 unless my $AA = $self->_codon_to_aa($codon)
288 0 0 unless my $AA = $self->_codon_to_aa($codon)
301 0 6 unless $input
320 0 2 unless my $codonTable = $self->codon_table
335 0 8 unless my $codonTable = $self->codon_table
352 0 160 unless my $codonTable = $self->codon_table
383 0 52 unless my $codonTable = $_[0]->codon_table
402 0 26 unless my $degHash = $self->aa_degeneracy_classes
403 0 26 unless my $aaClass = $$degHash{$deg}
409 26 0 wantarray ? :
422 0 0 unless my $codonTable = $self->codon_table
423 0 0 unless $codonTable->is_valid_codon($codon)
424 0 0 if $codonTable->is_stop_codon($codon)
433 0 0 unless my $codonTable = $self->codon_table
442 0 0 unless my $codonTable = $self->codon_table
456 0 130 unless $seqLen % 3 == 0
466 0 130 unless $accuLen
475 52 78 ref $seq ? :
481 130 0 if ($len > 0) { }