| Bio/SeqIO/largefasta.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 20 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 96 | 3 | 0 | if (not defined $self->sequence_factory) |
| 121 | 0 | 5624 | if ($seen == 1 and $entry =~ /^\s*>/) |
| 126 | 0 | 5624 | if ($entry eq '>') { } |
| 2 | 5622 | elsif ($entry =~ /\s*>(.+?)$/) { } | |
| 129 | 0 | 2 | unless ($id, $fulldesc) = $1 =~ /^\s*(\S+)\s*(.*)$/ |
| 138 | 0 | 5624 | if ++$count % 1000 == 0 and $self->verbose > 0 |
| 140 | 0 | 2 | unless $seen |
| 159 | 1 | 0 | if ($seq->can('desc') and my $desc = $seq->desc) |
| 168 | 1 | 2810 | if $stop > $end |
| 174 | 1 | 0 | if $self->_flush_on_write and defined $self->_fh |