| line |
true |
false |
branch |
|
19
|
0 |
0 |
$plus ? : |
|
|
0 |
0 |
$plus ? : |
|
24
|
0 |
0 |
$plus ? : |
|
|
0 |
0 |
$plus ? : |
|
29
|
0 |
0 |
$plus ? : |
|
|
0 |
0 |
$plus ? : |
|
35
|
2 |
0 |
if $cc |
|
41
|
0 |
0 |
if $cc |
|
47
|
2 |
0 |
if $cc |
|
53
|
0 |
0 |
if $cc |
|
59
|
0 |
0 |
if $cc |
|
65
|
0 |
0 |
if $cc |
|
72
|
0 |
10 |
&Rf & $S->FLAG_s ? : |
|
|
0 |
10 |
&Rf & $S->FLAG_m ? : |
|
82
|
0 |
0 |
if $cc |
|
83
|
0 |
0 |
if $cc |
|
90
|
0 |
0 |
if $cc |
|
91
|
0 |
0 |
if $cc |
|
98
|
2 |
0 |
if $cc |
|
105
|
0 |
0 |
if $cc |
|
106
|
0 |
0 |
if $cc |
|
115
|
0 |
0 |
if $cc |
|
122
|
0 |
4 |
if $cc |
|
129
|
0 |
4 |
if $cc |
|
136
|
0 |
0 |
if $cc |
|
137
|
0 |
0 |
if $cc |
|
144
|
0 |
2 |
unless ${&Rx;} =~ / \G \{ /cgx |
|
145
|
0 |
2 |
unless ${&Rx;} =~ / \G ([^\}]*) \} /cgx |
|
148
|
0 |
2 |
if $cc |
|
155
|
0 |
0 |
unless ${&Rx;} =~ / \G (.) /cgsx |
|
158
|
0 |
0 |
if ($name eq '{') |
|
159
|
0 |
0 |
unless ${&Rx;} =~ / \G ([^\}]*) \} /cgx |
|
163
|
0 |
0 |
if $cc |
|
170
|
0 |
0 |
unless ${&Rx;} =~ / \G (.) /cgsx |
|
173
|
0 |
0 |
if ($name eq '{') |
|
174
|
0 |
0 |
unless ${&Rx;} =~ / \G ([^\}]*) \} /cgx |
|
178
|
0 |
0 |
if $cc |
|
185
|
0 |
0 |
if $cc |
|
192
|
0 |
0 |
if $cc |
|
199
|
0 |
0 |
if $cc |
|
206
|
0 |
0 |
if $cc |
|
213
|
0 |
0 |
if $cc |
|
214
|
0 |
0 |
if $cc |
|
225
|
0 |
0 |
if ($num eq '{') { } |
|
226
|
0 |
0 |
unless ${&Rx;} =~ / \G ( [^\}]* ) \} /cgx |
|
236
|
0 |
0 |
$brace ? : |
|
237
|
0 |
0 |
if $cc |
|
244
|
0 |
6 |
&Rf & $S->FLAG_s ? : |
|
|
0 |
6 |
&Rf & $S->FLAG_m ? : |
|
254
|
0 |
0 |
if $cc |
|
255
|
0 |
0 |
if $cc |
|
262
|
0 |
0 |
if $cc |
|
263
|
0 |
0 |
if $cc |
|
349
|
31 |
262 |
unless ${&Rx;} =~ / \G (.) /cgsx |
|
353
|
189 |
73 |
if $S->can($c) |
|
377
|
6 |
0 |
if (${&Rx;} =~ / \G (\d+) (,?) (\d*) \} /cgx) |
|
379
|
2 |
4 |
unless $range |
|
381
|
0 |
6 |
if length $max and $min > $max |
|
390
|
4 |
30 |
if ${&Rx;} =~ / \G \? /cgx |
|
406
|
55 |
0 |
if (${&Rx;} =~ / \G (.) /cgsx) |
|
408
|
39 |
16 |
if $S->can($n) |
|
413
|
9 |
7 |
&SIZE_ONLY ? : |
|
421
|
0 |
4 |
&Rf & $S->FLAG_s ? : |
|
432
|
16 |
0 |
if (${&Rx;} =~ / \G (.) /cgsx) |
|
435
|
16 |
0 |
if $S->can($c) |
|
437
|
0 |
0 |
if ($n =~ /\d/) |
|
442
|
0 |
0 |
if (not &SIZE_ONLY || $cc and $n != 0) |
|
444
|
0 |
0 |
if ($v > 9 and $v > $S->{'maxpar'}) { } |
|
|
0 |
0 |
elsif ($v > $S->{'maxpar'}) { } |
|
456
|
0 |
0 |
if $n =~ /[a-zA-Z]/ |
|
471
|
0 |
2 |
if (${&Rx;} =~ / \G ([:.=]) .*? \1 ] /cgx) |
|
482
|
2 |
0 |
unless ${&Rx;} =~ / \G ] /cgx |
|
489
|
2 |
6 |
if ${&Rx;} =~ / \G (?= ] | \z ) /cgx |
|
495
|
6 |
0 |
if (${&Rx;} =~ / \G ( \\ ) /cgsx) { } |
|
|
0 |
0 |
elsif (${&Rx;} =~ / \G \[ ([.=:]) (\^?) (.*?) \1 \] /cgsx) { } |
|
|
0 |
0 |
elsif (${&Rx;} =~ / \G (.) /cgsx) { } |
|
502
|
0 |
0 |
if ($S->can($posix)) { } |
|
509
|
6 |
0 |
if ($ret == \$lhs) { } |
|
|
0 |
0 |
elsif ($ret == \$rhs) { } |
|
510
|
0 |
6 |
if (${&Rx;} =~ / \G (?= - ) /cgx) |
|
511
|
0 |
0 |
if ($lhs->visual =~ /^(?:\[[:.=]|\\[dDsSwWpP])/) |
|
523
|
0 |
0 |
if ($rhs->visual =~ /^(?:\[[:.=]|\\[dDsSwWpP])/) { } |
|
|
0 |
0 |
elsif ($lhs->visual gt $rhs->visual) { } |
|
537
|
3 |
3 |
if &SIZE_ONLY |
|
544
|
0 |
2 |
unless ${&Rx;} =~ / \G ] /cgx |
|
559
|
0 |
55 |
unless ${&Rx;} =~ / \G \) /cgx |
|
569
|
39 |
0 |
if (${&Rx;} =~ / \G (.) /cgsx) { } |
|
571
|
29 |
10 |
if $S->can($n) |
|
589
|
4 |
0 |
if (my $f = $S->can("FLAG_$_")) |
|
590
|
4 |
0 |
if my $v = $S->$f(1) |
|
598
|
2 |
8 |
if $off =~ s/^-// |
|
602
|
2 |
0 |
if (my $f = $S->can("FLAG_$_")) |
|
603
|
2 |
0 |
if my $v = $S->$f(0) |
|
611
|
10 |
0 |
if (${&Rx;} =~ / \G ([:)]) /cgx) |
|
612
|
6 |
4 |
$1 eq ':' ? : |
|
613
|
6 |
4 |
if ($type eq 'group') |
|
631
|
0 |
0 |
unless ${&Rx;} =~ / \G \) /cgx |
|
668
|
0 |
0 |
if (${&Rx;} =~ / \G (.) /cgsx) |
|
670
|
0 |
0 |
if $S->can($n) |
|
703
|
2 |
0 |
if (${&Rx;} =~ / \G ($nest_eval) \} \) /cgx) |
|
715
|
0 |
0 |
if (${&Rx;} =~ / \G (.) /cgsx) |
|
717
|
0 |
0 |
if $S->can($n) |
|
726
|
0 |
0 |
if (${&Rx;} =~ / \G ($nest_logical) \} \) /cgx) |
|
738
|
0 |
0 |
if (${&Rx;} =~ / \G (.) /cgsx) |
|
740
|
0 |
0 |
if $S->can($n) |
|
758
|
29 |
0 |
if (${&Rx;} =~ / \G (.) /cgsx) |
|
760
|
0 |
29 |
if $S->can($n) |
|
776
|
29 |
0 |
if (${&Rx;} =~ / \G (.) /cgsx) |
|
778
|
23 |
6 |
if $S->can($n) |
|
782
|
3 |
3 |
if (${&Rx;} =~ / \G ( [1-9]\d* ) /cgx) |
|
784
|
1 |
2 |
unless ${&Rx;} =~ / \G \) /cgx |
|
796
|
18 |
55 |
unless ${&Rx;} =~ / \G ([^|]) /cgsx |
|
800
|
23 |
32 |
if $S->can($c) |
|
807
|
2 |
17 |
unless ${&Rx;} =~ / \G \| /cgx |
|
815
|
18 |
1 |
unless ${&Rx;} =~ / \G \| /cgx |
|
825
|
17 |
6 |
if (${&Rx;} =~ / \G ( (?: [!=] | \{ ) ) /cgx) |
|
827
|
17 |
0 |
if $S->can($n) |