blib/lib/FASTAid.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 20 | 26 | 76.9 |
line | true | false | branch |
---|---|---|---|
142 | 0 | 5 | unless open DB, $fasta |
147 | 7 | 15 | if (/^>(\S+)/) |
150 | 1 | 6 | if (defined $data{$id}) { } |
159 | 1 | 3 | if scalar keys %data == 0 |
162 | 0 | 3 | unless open OUT, ">$index" |
185 | 1 | 3 | if scalar @ids == 0 |
193 | 0 | 3 | unless open INDEX, $index |
196 | 5 | 0 | if ($_ =~ /^(\S+)\s+(\S+)$/) |
204 | 0 | 3 | unless open DB, "$fasta" |
215 | 1 | 6 | if $IND1[$try] lt $id |
216 | 1 | 5 | if $IND1[$try] gt $id |
225 | 5 | 0 | if ($trans_try >= 0 and $IND1[$try] eq $id) { } |
233 | 2 | 12 | if $_ =~ /^>/ |