line |
true |
false |
branch |
138
|
0 |
1 |
unless ($cut and $cut->isa('Bio::CodonUsage::Table')) |
186
|
65 |
216 |
if $line =~ /^$/ |
190
|
3 |
213 |
if ($line =~ /^(.+?)\s*\[(\w+)\].+?(\d+)/) { } |
|
192 |
21 |
elsif ($line =~ /^(\w\w\w)\s+(\w+)\s+(\d+\.\d+)
\s+(\d+\.\d+)\s+(\d+\.\d+)/x) { } |
199
|
192 |
0 |
if (defined $1) |
209
|
3 |
213 |
if ($line =~ /^Cod.+?(\d\d\.\d\d)/) { } |
|
3 |
210 |
elsif ($line =~ /^1st.+?(\d\d\.\d\d)/) { } |
|
3 |
207 |
elsif ($line =~ /^2nd.+?(\d\d\.\d\d)/) { } |
|
3 |
204 |
elsif ($line =~ /^3rd.+?(\d\d\.\d\d)/) { } |
|
3 |
201 |
elsif ($line =~ /^Gen.+?(\d+)/) { } |
227
|
0 |
3 |
if (scalar keys %{$$cdtableobj{'_table'};} != 21) |