| line |
true |
false |
branch |
|
17
|
2 |
40 |
unless defined $substrate and _looks_like_string($substrate)
|
|
20
|
2 |
37 |
unless (defined $pos and $pos > 0 and $pos <= length $substrate)
|
|
31
|
8 |
29 |
if ($self->_cuts($pep)) { }
|
|
46
|
2 |
56 |
unless defined $substrate and _looks_like_string($substrate)
|
|
50
|
2 |
54 |
unless my(@sites) = $self->cleavage_sites($substrate)
|
|
71
|
2 |
7 |
unless defined $substrate and _looks_like_string($substrate)
|
|
75
|
4 |
28 |
if $self->cut($substrate, $pos)
|
|
94
|
671 |
54490 |
if ($length < 8)
|
|
95
|
288 |
383 |
if ($length > 4) { }
|
|
113
|
2 |
95 |
unless defined $substrate and _looks_like_string($substrate)
|
|
122
|
5340 |
49784 |
if ($self->_cuts($pep))
|