line |
true |
false |
branch |
39
|
0 |
50 |
unless defined $_[0] and ref $_[0] eq 'ARRAY' |
41
|
48 |
2 |
unless defined $item->[0] and ref $item->[0] eq 'ARRAY' |
42
|
2 |
0 |
unless defined $_[0] |
43
|
0 |
0 |
if defined $item->[0][0] |
51
|
2 |
0 |
if ($TRANS and $NODE) { } |
62
|
1 |
271 |
unless defined $orig |
68
|
271 |
0 |
if (wantarray) { } |
73
|
1 |
269 |
if ($_ ne '') |
76
|
269 |
0 |
wantarray ? : |
89
|
6 |
310 |
if (s/^ \[ //x) { } |
|
17 |
293 |
elsif (s/^ \{ //x) { } |
96
|
96 |
265 |
if ($2) { } |
|
239 |
26 |
elsif (defined $1) { } |
|
24 |
2 |
elsif (defined $3) { } |
|
2 |
0 |
elsif (defined $4) { } |
110
|
315 |
0 |
wantarray ? : |
129
|
8 |
161 |
if (s/^,//x) |
132
|
12 |
149 |
if (my $is_expr = s/^=//) |
136
|
45 |
104 |
if (not s/^$re_text//) { } |
142
|
106 |
59 |
if defined $1 |
143
|
0 |
165 |
if defined $4 |
144
|
4 |
161 |
if (my $opn = $2 || $3) { } |
|
59 |
102 |
elsif (not defined $1 || defined $4) { } |
161
|
0 |
12 |
if (s/^,//x) |
167
|
18 |
9 |
if defined $1 |
168
|
1 |
26 |
if defined $4 |
169
|
12 |
15 |
if (my $opn = $2 || $3) { } |
|
4 |
11 |
elsif (not defined $1 || defined $4) { } |
184
|
127 |
144 |
if (s/^ ([\)\]\}])//x) |
185
|
0 |
127 |
if $1 ne $close |
189
|
0 |
143 |
if ($cnt and $len == length $_) |
190
|
0 |
0 |
defined $close ? : |
192
|
138 |
5 |
@pipe <= 1 ? : |
202
|
19 |
28 |
if (s/^ ([\)\]\}])//x) |
203
|
0 |
19 |
if $1 ne $close |
207
|
22 |
6 |
if (s/^($re_word | , )//x) { } |
|
4 |
2 |
elsif (s/^([\(\[\{])//) { } |
213
|
1 |
27 |
if (defined $prev and $prev == length $_) |
223
|
17 |
25 |
if (s/^ ([\)\]\}])//x) |
224
|
0 |
17 |
if $1 ne '}' |
228
|
25 |
0 |
if (s/^([\w\.\-]+) [:=] //x or s/^($re_other+) ,?//x) |
231
|
0 |
25 |
$str =~ s/^:// ? : |
234
|
1 |
24 |
@value > 1 ? : |
235
|
0 |
25 |
unless (length $_ < $len) |
240
|
0 |
17 |
if (@hash - 1) % 2 |