line |
true |
false |
branch |
136
|
8 |
4 |
if @_ > 1 |
139
|
6 |
6 |
wantarray ? : |
177
|
510 |
480 |
unless my $class = ref $_[0] |
178
|
270 |
210 |
if ($class =~ /(HASH|ARRAY|SCALAR|CODE|GLOB)/) |
195
|
12 |
18 |
if @_ > 1 |
196
|
0 |
30 |
unless (defined $_[0]) |
197
|
0 |
0 |
if wantarray |
206
|
0 |
30 |
unless $ref |
215
|
30 |
0 |
if ($ref eq 'HASH') { } |
|
0 |
0 |
elsif ($ref eq 'ARRAY') { } |
225
|
24 |
6 |
if wantarray |
234
|
0 |
0 |
unless $n |
235
|
0 |
0 |
$bls ? : |
238
|
0 |
0 |
if $bls |
247
|
0 |
120 |
unless $n |
248
|
60 |
60 |
$bls ? : |
255
|
60 |
60 |
if $bls |
265
|
60 |
90 |
unless $n |
266
|
150 |
0 |
$bls ? : |
272
|
150 |
0 |
if $bls |
282
|
210 |
750 |
unless $n |
284
|
90 |
870 |
if ($ref eq 'HASH') { } |
|
150 |
720 |
elsif ($ref eq 'ARRAY') { } |
|
0 |
720 |
elsif ($ref eq 'SCALAR') { } |
|
0 |
720 |
elsif ($ref eq 'GLOB') { } |
|
0 |
720 |
elsif (do {
my $g = \$item;
ref $g eq 'GLOB'
}) { } |
|
210 |
510 |
elsif ($ref eq 'CODE') { } |
|
510 |
0 |
elsif (defined $item) { } |
324
|
0 |
510 |
if ($data =~ /^$/) { } |
|
180 |
330 |
elsif ($data =~ /\D/) { } |