| line |
true |
false |
branch |
|
19
|
1 |
0 |
if ($@) { } |
|
40
|
0 |
2 |
unless (defined $filename) |
|
46
|
1 |
1 |
if (defined $format) { } |
|
62
|
0 |
1 |
unless (defined $filename) |
|
68
|
1 |
0 |
if (defined $format) { } |
|
88
|
0 |
1 |
if (scalar @sequence_objects == 0) |
|
96
|
0 |
0 |
unless ($filename =~ /^\>/ or $filename =~ /^|/) |
|
105
|
0 |
1 |
if (not ref $seq) { } |
|
106
|
0 |
0 |
if (length $seq > 50) { } |
|
110
|
0 |
0 |
if ($error == 0) |
|
126
|
0 |
1 |
unless ($seq->isa('Bio::SeqI')) |
|
142
|
0 |
1 |
unless (defined $seq) |
|
150
|
1 |
0 |
if $accession |
|
159
|
0 |
1 |
unless (defined $verbose) |
|
163
|
0 |
1 |
if (not ref $seq) { } |
|
|
0 |
1 |
elsif (not $seq->isa('Bio::PrimarySeqI')) { } |
|
171
|
0 |
1 |
$seq->alphabet eq 'protein' ? : |
|
181
|
0 |
1 |
if ($verbose) |
|
192
|
1 |
1 |
if (not ref $rc) { } |
|
193
|
0 |
1 |
if ($rc < 0) |
|
196
|
0 |
1 |
if ($verbose) |
|
208
|
0 |
1 |
if ($verbose) |
|
218
|
0 |
0 |
unless ($filename =~ /^\>/ or $filename =~ /^|/) |
|
237
|
5 |
0 |
unless ($Bio::Perl::DBOKAY) |
|
247
|
0 |
0 |
if ($db_type =~ /genbank/) |
|
248
|
0 |
0 |
unless (defined $genbank_db) |
|
253
|
0 |
0 |
if ($db_type =~ /genpept/) |
|
254
|
0 |
0 |
unless (defined $genpept_db) |
|
260
|
0 |
0 |
if ($db_type =~ /swiss/) |
|
261
|
0 |
0 |
unless (defined $swiss_db) |
|
267
|
0 |
0 |
if ($db_type =~ /embl/) |
|
268
|
0 |
0 |
unless (defined $embl_db) |
|
274
|
0 |
0 |
if ($db_type =~ /refseq/ or not $db_type =~ /swiss/ and $identifier =~ /^\s*N\S+_/) |
|
276
|
0 |
0 |
unless (defined $refseq_db) |
|
284
|
0 |
0 |
if ($identifier =~ /^\w+\d+$/) { } |
|
299
|
2 |
2 |
if (ref $scalar) { } |
|
300
|
0 |
2 |
if (not $scalar->isa('Bio::PrimarySeqI')) { } |
|
308
|
0 |
2 |
if ($n < length($scalar) * 0.85) |
|
331
|
0 |
0 |
if (ref $scalar) { } |
|
332
|
0 |
0 |
if (not $scalar->isa('Bio::PrimarySeqI')) { } |
|
343
|
0 |
0 |
if ($n < length($scalar) * 0.85) |