| line |
true |
false |
branch |
|
25
|
86 |
38 |
unless defined $_[1] |
|
30
|
39 |
38 |
unless defined $_[1] |
|
35
|
39 |
38 |
unless defined $_[1] |
|
41
|
20 |
18 |
if $on =~ /i/ |
|
42
|
18 |
20 |
if $off =~ /i/ |
|
43
|
0 |
38 |
if $on =~ /s/ |
|
44
|
38 |
0 |
if $off =~ /s/ |
|
45
|
0 |
38 |
if $on =~ /m/ |
|
46
|
38 |
0 |
if $off =~ /m/ |
|
62
|
0 |
39 |
unless pop @Regexp::Genex::stack |
|
69
|
242 |
4 |
if ((my $len = length $code) < 40) { } |
|
72
|
242 |
0 |
if (defined $comment) { } |
|
79
|
4 |
0 |
if defined $comment |
|
95
|
27 |
20 |
!$_[0]->anycase ? : |
|
112
|
0 |
5 |
if (@chars > 10) |
|
312
|
0 |
0 |
$self->dot_nl ? : |
|
455
|
0 |
38 |
if $yape->error |
|
499
|
1 |
4 |
if defined $_[0] |