Branch Coverage

blib/lib/Bio/CUA/Summarizer.pm
Criterion Covered Total %
branch 28 74 37.8


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)
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') { }
232 0 6 unless my $seqIO = $self->_get_seq_io($input)
235 0 6 if ($each) { }
256 0 6 unless keys %list
274 0 0 unless my $codonList = $self->tabulate_codons($input)
277 0 0 if ($each) { }
283 0 0 unless my $AA = $self->_codon_to_aa($codon)
291 0 0 unless my $AA = $self->_codon_to_aa($codon)
304 0 6 unless $input
323 0 2 unless my $codonTable = $self->codon_table
338 0 8 unless my $codonTable = $self->codon_table
355 0 160 unless my $codonTable = $self->codon_table
386 0 52 unless my $codonTable = $_[0]->codon_table
405 0 26 unless my $degHash = $self->aa_degeneracy_classes
406 0 26 unless my $aaClass = $degHash->{$deg}
412 26 0 wantarray ? :
425 0 0 unless my $codonTable = $self->codon_table
426 0 0 unless $codonTable->is_valid_codon($codon)
427 0 0 if $codonTable->is_stop_codon($codon)
436 0 0 unless my $codonTable = $self->codon_table
445 0 0 unless my $codonTable = $self->codon_table
459 0 130 unless $seqLen % 3 == 0
469 0 130 unless $accuLen
478 52 78 ref $seq ? :
484 130 0 if ($len > 0) { }