| line |
true |
false |
branch |
|
30
|
7 |
10 |
unless $string_to_compile =~ /[\[~\]]/ms |
|
59
|
22 |
38 |
if ($1 eq '[' or $1 eq '') { } |
|
|
14 |
24 |
elsif ($1 eq ']') { } |
|
|
24 |
0 |
elsif (substr($1, 0, 1) ne '~') { } |
|
|
0 |
0 |
elsif ($1 eq '~~') { } |
|
|
0 |
0 |
elsif ($1 eq '~[') { } |
|
|
0 |
0 |
elsif ($1 eq '~]') { } |
|
|
0 |
0 |
elsif ($1 eq '~,') { } |
|
|
0 |
0 |
elsif ($1 eq '~') { } |
|
62
|
0 |
22 |
if ($in_group) { } |
|
63
|
0 |
0 |
if ($1 eq '') { } |
|
71
|
9 |
13 |
if ($1 eq '') { } |
|
77
|
0 |
22 |
unless @c |
|
78
|
10 |
12 |
if (length $c[-1]) |
|
81
|
7 |
3 |
if (not $c[-1] =~ /[^\x20-\x7E]/s) { } |
|
99
|
13 |
1 |
if ($in_group) { } |
|
106
|
0 |
13 |
if (not length $c[-1] or $c[-1] =~ /^\s+$/s) |
|
121
|
9 |
4 |
if ($m eq '_*' or $m =~ /^_(-?\d+)$/s) { } |
|
|
1 |
3 |
elsif ($m eq '*') { } |
|
|
1 |
2 |
elsif ($m eq '#') { } |
|
134
|
9 |
4 |
if ($m eq '') { } |
|
|
4 |
0 |
elsif ($m =~ /^\w+$/s) { } |
|
141
|
0 |
4 |
unless (exists $functions->{$m}) |
|
159
|
2 |
14 |
if ($p eq '_*') { } |
|
|
10 |
4 |
elsif ($p =~ /^_(-?\d+)$/s) { } |
|
|
4 |
0 |
elsif (not $p =~ /[^\x20-\x7E]/s) { } |
|
209
|
0 |
0 |
if ($in_group) { } |
|
233
|
9 |
0 |
if ($call_count) { } |
|
242
|
0 |
9 |
if @c and length $c[-1] |
|
244
|
0 |
9 |
if (@code == 0) { } |
|
|
9 |
0 |
elsif (@code > 1) { } |
|
257
|
0 |
9 |
if $@ |
|
271
|
0 |
1 |
defined $_[2] ? : |
|
272
|
0 |
1 |
if ($pos < 1) { } |
|
277
|
1 |
0 |
if ($pos > 2 and -1 == $first_tab || $first_tab > pos $_[0]) { } |
|
293
|
1 |
0 |
if ($i == -1) { } |
|
|
0 |
0 |
elsif ($i == length($_[0]) - 1) { } |