Branch Coverage

blib/lib/Bio/CUA/Summarizer.pm
Criterion Covered Total %
branch 29 74 39.1


line true false branch
21 4 0 if ($@) { }
113 1 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)
130 0 3 unless $codonTable
150 0 249 unless my $table = $_[0]{'_codon_table'}
165 1 0 wantarray ? :
188 5 52 unless ($ref)
191 0 5 if ($input =~ /^[ATGCUN]+$/ and not -f $input) { }
200 0 52 if ($ref eq 'HASH') { }
231 0 6 unless my $seqIO = $self->_get_seq_io($input)
234 0 6 if ($each) { }
255 0 6 unless keys %list
273 0 0 unless my $codonList = $self->tabulate_codons($input)
276 0 0 if ($each) { }
282 0 0 unless my $AA = $self->_codon_to_aa($codon)
290 0 0 unless my $AA = $self->_codon_to_aa($codon)
303 0 6 unless $input
322 0 2 unless my $codonTable = $self->codon_table
337 0 8 unless my $codonTable = $self->codon_table
354 0 160 unless my $codonTable = $self->codon_table
385 0 52 unless my $codonTable = $_[0]->codon_table
404 0 26 unless my $degHash = $self->aa_degeneracy_classes
405 0 26 unless my $aaClass = $$degHash{$deg}
411 26 0 wantarray ? :
424 0 0 unless my $codonTable = $self->codon_table
425 0 0 unless $codonTable->is_valid_codon($codon)
426 0 0 if $codonTable->is_stop_codon($codon)
435 0 0 unless my $codonTable = $self->codon_table
444 0 0 unless my $codonTable = $self->codon_table
458 0 130 unless $seqLen % 3 == 0
468 0 130 unless $accuLen
477 52 78 ref $seq ? :
483 130 0 if ($len > 0) { }