| line |
true |
false |
branch |
|
99
|
0 |
47 |
if not defined $id or $id eq '' |
|
154
|
0 |
716 |
unless defined $char |
|
155
|
183 |
533 |
if $char eq "\n" |
|
177
|
34 |
12 |
unless (defined $opts{'ignore_end_marker'} and $opts{'ignore_end_marker'} == 1) |
|
193
|
2 |
22 |
if (int $num != $num) { } |
|
199
|
20 |
4 |
if $opts{'terminator'} |
|
217
|
0 |
51 |
unless defined $id |
|
219
|
38 |
13 |
unless (defined $opts{'ignore_end_marker'} and $opts{'ignore_end_marker'} == 1) |
|
239
|
5 |
166 |
ord $1 < 33 || ord $1 > 126 ? : |
|
243
|
1 |
44 |
if ($string =~ /^'.+'$/) { } |
|
252
|
25 |
20 |
if $opts{'terminator'} |
|
265
|
0 |
86 |
unless $char eq 'p' |
|
287
|
6 |
52 |
if ($id eq '.' or $id eq 's' or $id eq 'a') |
|
290
|
0 |
52 |
if ($id eq 'g') |
|
295
|
1 |
51 |
if ($id eq 't') |
|
304
|
0 |
51 |
unless defined $sub |
|
321
|
18 |
0 |
unless $opts{'ignore_compound'} |
|
329
|
0 |
52 |
unless defined $sub |
|
348
|
20 |
15 |
if ($id eq 'l') { } |
|
|
6 |
9 |
elsif ($id eq 'd') { } |
|
370
|
1 |
33 |
if ($id eq '.' or $id eq 'a' or $id eq 's') |
|
374
|
0 |
33 |
if ($id eq 'g') |
|
379
|
9 |
24 |
if ($id eq 't') |
|
382
|
3 |
6 |
if ($opts{'ignore_end_marker'}) { } |
|
390
|
0 |
24 |
unless defined $sub |
|
420
|
5 |
6 |
if ($key_id eq '.') |
|
421
|
0 |
5 |
if $opts{'ignore_end_marker'} |
|
424
|
1 |
5 |
if $key_id eq 's' or $key_id eq 'a' |
|
426
|
0 |
5 |
if ($key_id eq 'g') |
|
433
|
0 |
5 |
unless defined $key_sub |
|
441
|
0 |
5 |
unless defined $val_sub |
|
476
|
0 |
8 |
unless defined $keysub |
|
480
|
0 |
8 |
unless defined $valsub |
|
509
|
0 |
0 |
if $char eq '.' |
|
523
|
23 |
69 |
if defined $ref and $ref ne '' |
|
525
|
24 |
45 |
if $val =~ /^-?(?:\d+(?:\.\d*)?|\.\d+)$/ |