| line |
true |
false |
branch |
|
98
|
1 |
6 |
ref $_[0] ? : |
|
114
|
0 |
112 |
if ($_ eq 'capture') |
|
115
|
0 |
0 |
$$self{'capture'} ? : |
|
118
|
4 |
108 |
if ($_ eq 'modifiers') |
|
135
|
0 |
0 |
unless $re =~ /^($RE_START)/ |
|
147
|
0 |
0 |
unless $mod =~ /x/ |
|
155
|
0 |
0 |
if ($paren eq ')') { } |
|
|
0 |
0 |
elsif ($paren eq '|') { } |
|
161
|
0 |
0 |
$indent ? : |
|
168
|
0 |
0 |
$isre ? : |
|
183
|
0 |
0 |
$mod ? : |
|
|
0 |
0 |
$mod ? : |
|
|
0 |
0 |
$isre ? : |
|
196
|
0 |
0 |
unless $list{$_}++ |
|
|
0 |
42 |
if ($$self{'_i'}) { } |
|
197
|
458 |
478 |
unless $list{$_}++ |
|
200
|
0 |
42 |
if $$self{'sort'} |
|
202
|
17 |
25 |
if ($$self{'quotemeta'}) { } |
|
212
|
0 |
25 |
if $$self{'_x'} |
|
216
|
0 |
42 |
if ($$self{'lookahead'}) |
|
221
|
0 |
0 |
$$self{'quotemeta'} ? : |
|
225
|
0 |
0 |
if (@lookahead > 1) |
|
232
|
0 |
42 |
if $mod =~ /x/ |
|
233
|
0 |
25 |
$mod ? : |
|
|
0 |
17 |
$mod ? : |
|
|
25 |
17 |
$$self{'as_string'} ? : |
|
241
|
94 |
1592 |
length $q == 2 ? : |
|
258
|
62 |
2620 |
if $str eq '' |
|
261
|
374 |
21312 |
unless $str =~ /\G$token/cg |
|
271
|
0 |
239 |
if $str eq '' |
|
274
|
0 |
335 |
unless $str =~ /\G$token/cgs |
|
287
|
1179 |
315 |
unless exists $prefix{$c} |
|
294
|
1008 |
171 |
if (@{$prefix{$_};} == 1) |
|
316
|
549 |
594 |
if ($$self{'quotemeta'}) { } |
|
317
|
365 |
184 |
length $str > 2 ? : |
|
323
|
230 |
364 |
if $str =~ /^$$self{'_token'}$/ |
|
333
|
0 |
213 |
unless @_ |
|
334
|
1 |
212 |
if @_ == 1 |
|
336
|
0 |
212 |
if $$self{'debug'} |
|
337
|
0 |
212 |
if $$self{'debug'} |
|
346
|
212 |
0 |
if ($$self{'optim_sx'}) { } |
|
349
|
130 |
551 |
if (@suffix) { } |
|
358
|
41 |
457 |
if (@prefix) { } |
|
369
|
0 |
0 |
@suffix ? : |
|
375
|
25 |
187 |
if @result == 1 and $result = $result[0] |
|
382
|
62 |
491 |
if ($result[$i] eq '') |
|
390
|
187 |
0 |
if ($$self{'optim_cc'}) |
|
393
|
256 |
285 |
if ($$self{'quotemeta'}) { } |
|
394
|
49 |
207 |
if (length $result[$i] == 2) |
|
395
|
31 |
18 |
if $charpos < 0 |
|
399
|
69 |
216 |
if ($result[$i] =~ /^$$self{'_cclass'}$/) |
|
400
|
41 |
28 |
if $charpos < 0 |
|
405
|
72 |
115 |
if (@char) |
|
409
|
46 |
26 |
if (@result == 1) |
|
410
|
46 |
0 |
if $result = "$result[0]$q" |
|
415
|
12 |
12 |
$$self{'quotemeta'} ? : |
|
|
0 |
141 |
if ($$self{'optim_cq'} and @result == 1 and $$self{'quotemeta'} ? length $result[0] == 1 : $result[0] =~ /^$$self{'_token'}$/) { } |
|
426
|
0 |
212 |
if $$self{'debug'} |
|
428
|
0 |
212 |
if $$self{'_x'} or $$self{'debug'} |
|
435
|
0 |
72 |
unless @_ |
|
436
|
31 |
41 |
if ($$self{'quotemeta'}) |
|
437
|
15 |
16 |
@_ > 1 ? : |
|
|
31 |
0 |
@_ ? : |
|
441
|
0 |
69 |
if $_ eq '.' |
|
447
|
0 |
69 |
if (s/^\[\^(.*)\]$/$1/) |
|
450
|
0 |
69 |
if (s/^\[(.*)\]$/$1/) { } |
|
454
|
0 |
69 |
$_ eq '-' ? : |
|
458
|
0 |
41 |
if $nneg > 1 |
|
459
|
25 |
16 |
if $npos > 1 |
|
460
|
0 |
0 |
$positive ? : |
|
|
0 |
41 |
$negative ? : |