| line |
true |
false |
branch |
|
34
|
5 |
763 |
unless $t->{'k'} eq $k |
|
55
|
215 |
1562 |
if $c[$j] =~ /\s/ |
|
63
|
136 |
1771 |
if $c[$j] =~ /\s/ |
|
76
|
325 |
2111 |
if ($ch =~ /\s/) |
|
81
|
1674 |
437 |
$i > 0 ? : |
|
82
|
1883 |
228 |
$i + 1 < $n ? : |
|
83
|
1883 |
228 |
$i + 1 < $n ? : |
|
93
|
90 |
2021 |
if (exists $two_char{$pair}) |
|
109
|
22 |
1999 |
if (exists $one_char{$ch}) |
|
111
|
5 |
7 |
if ($ch eq "+" or $ch eq "-" or $ch eq "%") |
|
112
|
13 |
2 |
if (&$ws_on_both($prev, $next)) |
|
128
|
5 |
0 |
if ($ch eq "/" and &$ws_on_both($prev, $next) and defined $prev_nonws and defined $next_nonws and not $prev_nonws =~ m<[\[\(,:?/]> and not $next_nonws =~ m<[\]\),:?/]>) |
|
137
|
3 |
1 |
if ($ch eq "/" and _is_ws($prev) ^^ _is_ws($next) and defined $prev_nonws and defined $next_nonws and not $prev_nonws =~ m<[\[\(,:?/]> and not $next_nonws =~ m<[\]\),:?/]>) |
|
144
|
407 |
1584 |
if ($ch eq "/") |
|
145
|
121 |
1463 |
if ($ch eq "(") |
|
146
|
121 |
1342 |
if ($ch eq ")") |
|
147
|
96 |
1246 |
if ($ch eq "[") |
|
148
|
96 |
1150 |
if ($ch eq "]") |
|
149
|
46 |
1104 |
if ($ch eq ",") |
|
151
|
31 |
1073 |
if ($ch eq ".") |
|
152
|
2 |
19 |
if ($i + 2 < $n and $c[$i + 1] eq "." and $c[$i + 2] eq "*") |
|
157
|
11 |
18 |
if ($i + 1 < $n and $c[$i + 1] eq ".") |
|
167
|
10 |
1063 |
if ($ch eq "*" and &$ws_on_both($prev, $next)) |
|
173
|
132 |
931 |
if ($ch eq "*") |
|
174
|
85 |
47 |
if ($i + 1 < $n and $c[$i + 1] eq "*") |
|
184
|
7 |
924 |
if ($ch eq "!") |
|
185
|
1 |
923 |
if ($ch eq "~") |
|
187
|
14 |
909 |
if ($ch eq "?" or $ch eq ":") |
|
188
|
14 |
0 |
if (&$ws_on_both($prev, $next)) |
|
189
|
7 |
7 |
$ch eq '?' ? : |
|
196
|
137 |
772 |
if ($ch eq "\"" or $ch eq "'") |
|
203
|
0 |
1040 |
if ($esc) |
|
208
|
0 |
1040 |
if ($cc eq "\\") |
|
209
|
137 |
903 |
if $cc eq $quote |
|
216
|
7 |
765 |
if ($ch eq "#") |
|
218
|
0 |
7 |
unless $j < $n and $c[$j] =~ /\d/ |
|
226
|
173 |
592 |
if ($ch =~ /[0-9]/) |
|
236
|
592 |
0 |
if (defined $name->{'v'} and length $name->{'v'}) |
|
251
|
0 |
0 |
if $c eq "n" |
|
252
|
0 |
0 |
if $c eq "r" |
|
253
|
0 |
0 |
if $c eq "t" |
|
269
|
0 |
3481 |
if ($esc) |
|
276
|
0 |
3481 |
if ($c eq "\\") |
|
282
|
468 |
3013 |
if $delim{$c} |
|
283
|
0 |
3013 |
if $c =~ /\s/ |
|
288
|
0 |
592 |
unless length $buf |