| line |
true |
false |
branch |
|
32
|
0 |
5 |
unless my $self = shift() |
|
35
|
0 |
5 |
unless $elemRef eq 'Regexp' |
|
42
|
0 |
5 |
if $#{$treeArray;} > 0 |
|
43
|
0 |
5 |
unless ref $$treeArray[0] eq 'YAPE::Regex::group' |
|
54
|
3 |
2 |
if $Parse::RandGen::Regexp::Debug |
|
62
|
0 |
0 |
unless my $self = shift() |
|
71
|
0 |
202 |
unless my $self = shift() |
|
77
|
0 |
0 |
unless my $ruleRef = $self->capture($cap) |
|
91
|
0 |
0 |
unless my $self = shift() |
|
92
|
0 |
0 |
unless defined $$self{'_captureList'} |
|
98
|
0 |
0 |
unless my $self = shift() |
|
100
|
0 |
0 |
defined $capture ? : |
|
|
0 |
0 |
unless defined $capture and $capture =~ /^(\d+)|([a-z]\w*)$/i |
|
105
|
0 |
0 |
if (defined $num) { } |
|
107
|
0 |
0 |
unless $num >= 1 and $num <= $numCaptures |
|
111
|
0 |
0 |
unless defined $$self{'_captureNames'} and defined $$self{'_captureNames'}{$name} |
|
118
|
0 |
0 |
unless my $self = shift() |
|
120
|
0 |
0 |
unless defined $$self{'_captureNames'} |
|
122
|
0 |
0 |
unless defined $capNum and $capNum =~ /\d+/ |
|
125
|
0 |
0 |
unless $capNum >= 1 and $capNum <= $numCaptures |
|
149
|
0 |
18 |
unless my $self = shift() |
|
151
|
0 |
18 |
unless my $curRef = shift() |
|
155
|
5 |
13 |
if ($yType eq 'YAPE::Regex::group') |
|
160
|
8 |
10 |
if ($yType eq 'YAPE::Regex::group' or $yType eq 'YAPE::Regex::capture') { } |
|
|
0 |
10 |
elsif ($yType eq 'YAPE::Regex::whitespace' or $yType eq 'YAPE::Regex::anchor' or $yType eq 'YAPE::Regex::comment') { } |
|
162
|
0 |
8 |
unless defined $$yIter{'NGREED'} |
|
163
|
0 |
8 |
unless defined $$yIter{'QUANT'} |
|
168
|
2 |
13 |
if ($elemType eq 'YAPE::Regex::alt') { } |
|
|
3 |
10 |
elsif ($elemType eq 'YAPE::Regex::group' or $elemType eq 'YAPE::Regex::capture') { } |
|
173
|
0 |
3 |
unless defined $$elemIter{'NGREED'} |
|
174
|
0 |
3 |
unless defined $$elemIter{'QUANT'} |
|
181
|
3 |
0 |
if ($elemType eq 'YAPE::Regex::capture') |
|
182
|
3 |
0 |
unless $$self{'_captureList'} |
|
203
|
0 |
10 |
unless defined $$yIter{'NGREED'} |
|
204
|
0 |
10 |
unless defined $$yIter{'QUANT'} |
|
209
|
7 |
3 |
if ($yType eq 'YAPE::Regex::text' and $cur{'off'}{'i'} and not $quant) { } |
|
|
0 |
3 |
elsif ($yType eq 'YAPE::Regex::alt') { } |
|
215
|
0 |
3 |
if ($yType eq 'YAPE::Regex::text') { } |
|
|
3 |
0 |
elsif (exists $Parse::RandGen::Regexp::_Yterm{$yType}) { } |
|
221
|
0 |
0 |
unless $nchar ne $char |
|
222
|
0 |
0 |
if ($nchar eq $char or $cur{'off'}{'i'}) { } |
|
240
|
0 |
3 |
if ($yType eq 'YAPE::Regex::any') { } |
|
244
|
3 |
0 |
if (not $on and $off eq 'imsx') { } |