|  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) { }  |