| Bio/AlignIO/selex.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 16 | 62.5 |
| line | true | false | branch |
|---|---|---|---|
| 106 | 0 | 375 | if ($entry =~ /^\#=GS\s+(\S+)\s+AC\s+(\S+)/) { } |
| 0 | 375 | elsif ($entry =~ /^\#=GS\s+(\S+)\s+DE\s+(.+)\s*$/) { } | |
| 156 | 219 | elsif ($entry =~ /^([^\#]\S+)\s+([A-Za-z\.\-\*]+)\s*/) { } | |
| 114 | 6 | 150 | unless (defined $align{$name}) |
| 124 | 0 | 6 | if ($name =~ m[(\S+)/(\d+)-(\d+)]) { } |
| 146 | 3 | 0 | if $aln->num_sequences |
| 172 | 0 | 8 | unless $self->_print(sprintf("%s %s\n", $namestr, $seq->seq)) |
| 175 | 2 | 0 | if $self->_flush_on_write and defined $self->_fh |