| line |
true |
false |
branch |
|
21
|
0 |
18 |
unless defined $_[0] |
|
23
|
0 |
18 |
unless $ref |
|
24
|
0 |
18 |
unless ($ref eq 'HASH' or $ref eq 'ARRAY') |
|
33
|
10 |
8 |
if ($ref eq 'HASH') { } |
|
|
8 |
0 |
elsif ($ref eq 'ARRAY') { } |
|
50
|
0 |
45 |
unless $n |
|
65
|
8 |
0 |
unless $n |
|
79
|
148 |
121 |
unless $n |
|
81
|
35 |
234 |
if ($ref eq 'HASH') { } |
|
|
0 |
234 |
elsif ($ref eq 'ARRAY') { } |
|
|
0 |
234 |
elsif ($ref eq 'SCALAR') { } |
|
|
0 |
234 |
elsif ($ref eq 'GLOB') { } |
|
|
0 |
234 |
elsif (do {
my $g = \$item;
ref $g eq 'GLOB'
}) { } |
|
|
0 |
234 |
elsif ($ref eq 'CODE') { } |
|
|
234 |
0 |
elsif (defined $item) { } |
|
120
|
159 |
75 |
$data =~ /\D/ || $data =~ /^$/ ? : |