line |
true |
false |
branch |
71
|
0 |
0 |
unless opendir my $CODDIR, $path
|
76
|
0 |
0 |
if ($table =~ /\.rscu\Z/x) { }
|
|
0 |
0 |
elsif ($table =~ /\.ct\Z/x) { }
|
96
|
0 |
14 |
unless open my $CFILE, '<', $path
|
103
|
896 |
0 |
if ($line =~ /$CODLINE/) { }
|
115
|
0 |
896 |
unless exists $$cods{$codon}
|
136
|
147 |
301 |
unless exists $$revcodon_t{$aa}
|
152
|
0 |
15 |
if $nucseq =~ /$Bio::GeneDesign::Codons::ambnt/
|
154
|
3 |
12 |
if $frame < 0
|
159
|
1223 |
4 |
if exists $$codon_t{$codon}
|
219
|
0 |
502 |
unless $newseqs{$a}[0] <=> $newseqs{$b}[0]
|
223
|
2 |
0 |
unless ($newseq =~ /$pattern/ or _complement($newseq, 1) =~ /$pattern/)
|
300
|
64 |
0 |
$x_j > 0 ? :
|
396
|
0 |
37 |
unless exists $ambtransswits{$swit}
|
397
|
8 |
29 |
if ($swit eq 's' or $swit eq 't') { }
|
400
|
1 |
7 |
if $swit eq 's'
|
412
|
4 |
25 |
if $swit < 0
|
413
|
29 |
0 |
if abs $swit < 4
|
420
|
0 |
67 |
unless ($swit)
|
424
|
29 |
38 |
if ($gothrough == 0) { }
|
455
|
0 |
88 |
if not $codon or length $codon != 3
|
457
|
25 |
63 |
if (exists $$memo{$codon}) { }
|
|
0 |
63 |
elsif ($codon eq 'NNN') { }
|
541
|
0 |
0 |
if ($aa ne '*') { }
|
569
|
0 |
0 |
if ($i >= $score_threshold)
|
574
|
0 |
0 |
if ($min_score > $scoresum)
|
616
|
6 |
0 |
$rounds <= $diff ? :
|
634
|
1 |
5 |
if $rounds % 3 == 0
|
637
|
0 |
3 |
if $check ne $peptide
|
668
|
1 |
2 |
if ($curcod =~ /$ctregx/) { }
|
678
|
2 |
6 |
if $potcod =~ /$ctregx/ or $curtar =~ _regres($potcod)
|
679
|
2 |
6 |
if ($flag != 0)
|
690
|
1 |
0 |
length $copy == length $oldpatt ? :
|
702
|
0 |
0 |
$oldaa eq '*' ? :
|
|
0 |
0 |
$newaa eq '*' ? :
|
|
0 |
0 |
$oldaa eq '*' ? :
|
|
0 |
0 |
$oldaa eq $newaa ? :
|