line |
true |
false |
branch |
32
|
0 |
5 |
unless defined $file |
38
|
5 |
0 |
if (not defined $format) { } |
39
|
2 |
3 |
if ($file =~ /\.(fasta|fa)(\.|$)/) { } |
|
3 |
0 |
elsif ($file =~ /\.(fastq|fq)(\.|$)/) { } |
51
|
2 |
3 |
if ($format eq 'fasta') { } |
|
3 |
0 |
elsif ($format eq 'fastq') { } |
58
|
5 |
2 |
if (defined $prev_line) { } |
78
|
6 |
1 |
if (defined $name) { } |
104
|
2 |
0 |
if (defined $entry1 and defined $entry2) { } |
116
|
0 |
1 |
unless defined $file and defined $format |
123
|
1 |
0 |
if ($format eq 'gff3') { } |
|
0 |
0 |
elsif ($format eq 'gtf' or $format eq 'gff2') { } |
137
|
1 |
0 |
if (defined $line) { } |
166
|
0 |
6 |
if ($file =~ /\.gz$/) { } |
167
|
0 |
0 |
unless open $fh, "gunzip -c $file |" |
169
|
0 |
6 |
unless open $fh, "< $file" |
178
|
0 |
0 |
if ($file =~ /\.gz$/) { } |
179
|
0 |
0 |
unless open $fh, "| gzip > $file" |
181
|
0 |
0 |
unless open $fh, "> $file" |