| line |
true |
false |
branch |
|
31
|
15 |
13 |
if (length $1) |
|
42
|
0 |
160 |
if ($proceed) |
|
45
|
25 |
135 |
if (@result) { } |
|
46
|
14 |
11 |
if length $_ |
|
74
|
7 |
303 |
unless (s/^;//sx) |
|
75
|
3 |
4 |
if (/^\s|^$/) { } |
|
95
|
82 |
393 |
@pipe ? : |
|
97
|
9 |
271 |
@pipe ? : |
|
|
195 |
280 |
$+{'open'} ? : |
|
99
|
20 |
455 |
if (not @pipe and $+{'hash'}) { } |
|
104
|
392 |
63 |
defined $+{'var'} ? : |
|
|
175 |
280 |
$+{'open'} ? : |
|
109
|
308 |
86 |
if (wantarray) { } |
|
112
|
15 |
71 |
@pipe > 1 ? : |
|
122
|
1 |
253 |
if (length $_ == $prevlen and $emptycnt++) |
|
129
|
3 |
173 |
unless $1 eq $close |
|
136
|
37 |
246 |
$for_expr ? : |
|
137
|
10 |
273 |
if (s/^ ,//sx) { } |
|
|
30 |
243 |
elsif (s/^ (?=[\)\]\};])//sx) { } |
|
143
|
157 |
86 |
if (s/^(?: (? $self->{'ch_etext'} (?:$self->{'ch_etext'} | :)* )
| $self->{'re_eparen'}
)//sx) { } |
|
149
|
157 |
175 |
if $+{'close'} |
|
150
|
157 |
18 |
if (defined $+{'text'}) { } |
|
|
8 |
10 |
elsif (defined $+{'paren'}) { } |
|
156
|
10 |
165 |
if $+{'open'} |
|
162
|
13 |
144 |
$text =~ s/^=// ? : |
|
180
|
10 |
0 |
if ($+{'close'}) |
|
183
|
0 |
10 |
unless $+{'close'} eq $close |
|
186
|
0 |
0 |
if $+{'open'} |
|
197
|
20 |
29 |
if s/^\}// |
|
198
|
0 |
29 |
unless s/^ ($self->{'ch_etext'}*) (?: [:,])//sx |