| line |
true |
false |
branch |
|
80
|
327 |
0 |
if (@_) |
|
83
|
12 |
315 |
if (ref $o eq 'HASH') { } |
|
|
12 |
303 |
elsif (ref $o eq 'ARRAY') { } |
|
|
0 |
303 |
elsif (ref $o eq 'SCALAR') { } |
|
|
259 |
44 |
elsif (ref $o) { } |
|
84
|
8 |
4 |
if (not $seen{$o}) { } |
|
95
|
12 |
0 |
if (not $seen{$o}) { } |
|
114
|
42 |
2 |
if defined $o |
|
134
|
10 |
99 |
unless $l |
|
135
|
33 |
66 |
if $l < 0 |
|
149
|
0 |
0 |
if (@_) |
|
267
|
0 |
0 |
if $key eq '=' |
|
311
|
12 |
90 |
if $$self{'Comment'} |
|
333
|
60 |
20 |
unless $$self{'Comment'} |
|
349
|
0 |
140 |
unless $c |
|
350
|
140 |
0 |
if (ref $c) { } |
|
351
|
140 |
0 |
if (ref $c eq 'ARRAY') { } |
|
374
|
0 |
0 |
unless $$self{'Comment'} |
|
375
|
0 |
0 |
unless $c |
|
376
|
0 |
0 |
if (ref $c) { } |
|
377
|
0 |
0 |
if (ref $c eq 'ARRAY') { } |
|
451
|
12 |
90 |
if ($self->isReference) |
|
452
|
12 |
0 |
if ($self->valid) { } |
|
460
|
12 |
90 |
if ($OBJ{$self}) |
|
478
|
180 |
24 |
unless $$self{'Comment'} |
|
493
|
30 |
168 |
if ($self->isReference) |
|
494
|
30 |
0 |
if ($self->valid) { } |
|
501
|
30 |
168 |
if ($OBJ{$self}) |
|
527
|
1 |
1 |
if (not ref $file) { } |
|
|
1 |
0 |
elsif (ref $file eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (ref $file eq 'GLOB') { } |
|
528
|
0 |
1 |
unless open $fh, '>:raw:encoding(UTF-16)', $file |
|
532
|
0 |
1 |
unless open $fh, '>:utf8', $file |
|
567
|
2 |
2 |
if (not ref $file) { } |
|
|
2 |
0 |
elsif (ref $file eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (ref $file eq 'GLOB') { } |
|
568
|
0 |
2 |
unless open $fh, '>:raw', $file |
|
571
|
0 |
2 |
unless open $fh, '>', $file |