| line |
true |
false |
branch |
|
56
|
0 |
0 |
if (wantarray) |
|
87
|
4323 |
6 |
unless my $class = ref $_[0] |
|
88
|
6 |
0 |
if ($class =~ /(HASH|ARRAY|SCALAR|CODE|GLOB)/) |
|
100
|
0 |
6 |
unless (defined $_[0]) |
|
101
|
0 |
0 |
if wantarray |
|
110
|
0 |
6 |
unless $ref |
|
118
|
0 |
6 |
if ($ref eq 'HASH') { } |
|
|
6 |
0 |
elsif ($ref eq 'ARRAY') { } |
|
128
|
0 |
6 |
if wantarray |
|
137
|
0 |
0 |
unless $n |
|
138
|
0 |
0 |
$bls ? : |
|
141
|
0 |
0 |
if $bls |
|
150
|
0 |
0 |
unless $n |
|
151
|
0 |
0 |
$bls ? : |
|
158
|
0 |
0 |
if $bls |
|
168
|
6 |
0 |
unless $n |
|
169
|
0 |
6 |
$bls ? : |
|
175
|
0 |
6 |
if $bls |
|
185
|
4323 |
0 |
unless $n |
|
187
|
0 |
4323 |
if ($ref eq 'HASH') { } |
|
|
0 |
4323 |
elsif ($ref eq 'ARRAY') { } |
|
|
0 |
4323 |
elsif ($ref eq 'SCALAR') { } |
|
|
0 |
4323 |
elsif ($ref eq 'GLOB') { } |
|
|
0 |
4323 |
elsif (do {
my $g = \$item;
ref $g eq 'GLOB'
}) { } |
|
|
0 |
4323 |
elsif ($ref eq 'CODE') { } |
|
|
4323 |
0 |
elsif (defined $item) { } |
|
227
|
0 |
4323 |
if ($data =~ /^$/) { } |
|
|
4323 |
0 |
elsif ($data =~ /\D/) { } |
|
237
|
0 |
0 |
$data =~ /\D/ || $data =~ /^$/ ? : |