line |
true |
false |
branch |
108
|
0 |
3 |
unless $self->_initialize_io(@args) |
126
|
3 |
0 |
if $type |
129
|
1 |
2 |
if ($self->{'mtype'} eq 'SEQ') { } |
131
|
25 |
25 |
$self->{'mtype'} eq 'PWM' ? : |
138
|
0 |
25 |
if $a + $c + $g + $t != 10 |
181
|
1 |
6 |
if $self->{'_end'} |
183
|
0 |
6 |
unless $line =~ /^>/ |
189
|
1 |
122 |
if $line =~ /^\s+$/ |
191
|
4 |
118 |
if ($line =~ /^>/) |
196
|
18 |
100 |
if (not $line =~ /[^ACGTacgt]/g) { } |
199
|
0 |
18 |
if $self->{'_mtype'} != 3 and $mtype |
200
|
0 |
18 |
if $len and $len != length $line |
202
|
2 |
16 |
unless $len |
211
|
100 |
0 |
if ($#data == 3) { } |
212
|
0 |
100 |
if $mtype and $self->{'_mtype'} != 1 |
217
|
0 |
0 |
if $mtype and $self->{'_mtype'} != 2 |
224
|
2 |
4 |
unless defined $line and $line =~ /^>/ |
230
|
4 |
2 |
if ($type == 1) |
239
|
2 |
4 |
if ($type == 3) { } |
246
|
2 |
2 |
if $k == 1 and $l == 0 |
247
|
2 |
2 |
if $l != 0 |
251
|
2 |
4 |
if ($mformat eq 'pwm') |
265
|
2 |
4 |
if ($mformat eq 'pwm') { } |