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) { } |