| line |
true |
false |
branch |
|
255
|
0 |
78 |
unless $seq |
|
258
|
71 |
7 |
if ($type =~ /nuc|[dr]na/i) { } |
|
|
7 |
0 |
elsif ($type =~ /amino|pep|prot/i) { } |
|
295
|
0 |
0 |
if $self->{'_alphabet_checked'} |
|
301
|
0 |
0 |
if ($pat =~ /[^$Regexp_chars]/io) |
|
333
|
1 |
1 |
if ($self->type =~ /[DR]na/i) { } |
|
|
1 |
0 |
elsif ($self->type =~ /Amino/i) { } |
|
365
|
0 |
1 |
if ($pat =~ /\[\w*[BZ]\w*\]/) { } |
|
409
|
0 |
2 |
if ($pat =~ /\[\w*[RYSWMK]\w*\]/) { } |
|
481
|
1 |
33 |
unless ($self->type =~ /Dna|Rna/i) |
|
492
|
1 |
32 |
if ($expand) |
|
544
|
1 |
6 |
if ($self->type ne 'Amino') |
|
580
|
33 |
4 |
unless ($pat =~ /(.*)\{(\S+?)\}(.*)/) |
|
588
|
0 |
4 |
unless $pat |
|
595
|
19 |
98 |
unless ($pat =~ /(.*)\[(\S+?)\](.*)/) |
|
603
|
14 |
84 |
unless $pat |
|
610
|
33 |
0 |
unless ($pat =~ /(.*)\*([\w.])(.*)/) |
|
619
|
0 |
0 |
unless $pat |
|
650
|
33 |
4 |
unless ($pat =~ s/(.*)(\{\S+?\})([\w.])(.*)/$1#$3$2$4/) |
|
659
|
0 |
4 |
unless $pat |
|
687
|
3 |
33 |
if ($pat =~ /(.*)(.)(\{\S+\})(\(\w+\))(.*)/) { } |
|
|
0 |
33 |
elsif ($pat =~ /^(\{\S+\})(\(\w+\))(.*)/) { } |
|
709
|
0 |
3 |
unless $pat |
|
738
|
0 |
33 |
if ($pat =~ /(.*)(.)(\{\S+\})(\[\w+\])(.*)/) { } |
|
|
0 |
33 |
elsif ($pat =~ /^(\{\S+\})(\[\w+\])(.*)/) { } |
|
744
|
0 |
0 |
if (defined $braces and defined $2 and exists $Processed_braces{"$2$braces"} || exists $Processed_asterics{$2}) { } |
|
762
|
0 |
0 |
unless $pat |
|
792
|
0 |
33 |
if ($pat =~ /(.*)(.)\*(\[\w+\]|\(\w+\))(.*)/) { } |
|
|
0 |
33 |
elsif ($pat =~ /^\*(\[\w+\]|\(\w+\))(.*)/) { } |
|
796
|
0 |
0 |
if (exists $Processed_asterics{$2}) { } |
|
813
|
0 |
0 |
unless $pat |
|
852
|
33 |
0 |
unless ($pat =~ /(.*)\?(\[\w+\]|\(\w+\)|\w)(\{\S+?\})?(.*)/) |
|
853
|
0 |
0 |
$3 ? : |
|
863
|
0 |
0 |
unless $pat |
|
882
|
78 |
80 |
if (@_) |
|
903
|
78 |
79 |
if (@_) |