| 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 |
|
135
|
10 |
99 |
unless $l |
|
136
|
33 |
66 |
if $l < 0 |
|
150
|
0 |
0 |
if (@_) |
|
268
|
0 |
0 |
if $key eq '=' |
|
312
|
12 |
90 |
if $$self{'Comment'} |
|
334
|
60 |
20 |
unless $$self{'Comment'} |
|
350
|
0 |
140 |
unless $c |
|
351
|
140 |
0 |
if (ref $c) { } |
|
352
|
140 |
0 |
if (ref $c eq 'ARRAY') { } |
|
375
|
0 |
0 |
unless $$self{'Comment'} |
|
376
|
0 |
0 |
unless $c |
|
377
|
0 |
0 |
if (ref $c) { } |
|
378
|
0 |
0 |
if (ref $c eq 'ARRAY') { } |
|
452
|
12 |
90 |
if ($self->isReference) |
|
453
|
12 |
0 |
if ($self->valid) { } |
|
461
|
12 |
90 |
if ($OBJ{$self}) |
|
479
|
180 |
24 |
unless $$self{'Comment'} |
|
494
|
30 |
168 |
if ($self->isReference) |
|
495
|
30 |
0 |
if ($self->valid) { } |
|
502
|
30 |
168 |
if ($OBJ{$self}) |
|
528
|
1 |
1 |
if (not ref $file) { } |
|
|
1 |
0 |
elsif (ref $file eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (ref $file eq 'GLOB') { } |
|
529
|
0 |
1 |
unless open $fh, '>:raw:encoding(UTF-16)', $file |
|
533
|
0 |
1 |
unless open $fh, '>:utf8', $file |
|
569
|
2 |
2 |
if (not ref $file) { } |
|
|
2 |
0 |
elsif (ref $file eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (ref $file eq 'GLOB') { } |
|
570
|
0 |
2 |
unless open $fh, '>:raw', $file |
|
573
|
0 |
2 |
unless open $fh, '>', $file |