| line |
true |
false |
branch |
|
26
|
0 |
0 |
if (my $type = builtin::reftype($_[0]) and not &Internals::SvREADONLY($_[0])) |
|
28
|
0 |
0 |
if ($type eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($type eq 'HASH') { } |
|
43
|
0 |
0 |
if (my $type = builtin::reftype($_[0]) and &Internals::SvREADONLY($_[0])) |
|
45
|
0 |
0 |
if ($type eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($type eq 'HASH') { } |
|
58
|
0 |
0 |
if (my $type = builtin::reftype($_[0])) |
|
59
|
0 |
0 |
if ($type eq "HASH" or $type eq "ARRAY") |
|
60
|
0 |
0 |
&Internals::SvREADONLY($_[0]) ? : |
|
64
|
0 |
0 |
&Internals::SvREADONLY(\$_[0]) ? : |
|
70
|
0 |
0 |
unless (scalar @args) |
|
74
|
0 |
0 |
if (ref $_[0] eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $_[0] eq 'HASH') { } |
|
78
|
0 |
0 |
if @args % 2 |
|
83
|
0 |
0 |
if ($ref eq 'HASH' or $ref eq 'ARRAY') { } |
|
98
|
0 |
0 |
if ($ref eq 'HASH' or $ref eq 'ARRAY') { } |
|
113
|
0 |
0 |
if ($ref eq 'HASH' or $ref eq 'ARRAY') { } |
|
123
|
0 |
0 |
if ($ref eq 'HASH' or $ref eq 'ARRAY') { } |