| line |
true |
false |
branch |
|
23
|
0 |
31 |
if $IgnoreOverload |
|
25
|
1 |
30 |
if (not defined $thingy) { } |
|
|
3 |
27 |
elsif (ref $thingy eq 'HASH') { } |
|
|
3 |
24 |
elsif (ref $thingy eq 'ARRAY') { } |
|
|
1 |
23 |
elsif (ref $thingy eq 'SCALAR') { } |
|
|
2 |
21 |
elsif (ref $thingy eq 'CODE') { } |
|
|
1 |
20 |
elsif (ref $thingy eq 'GLOB') { } |
|
|
3 |
17 |
elsif (my $name = ref $thingy) { } |
|
29
|
2 |
1 |
if (%{$thingy;}) { } |
|
41
|
2 |
1 |
if (@{$thingy;}) { } |
|
59
|
0 |
3 |
$IgnoreOverload ? : |
|
60
|
1 |
2 |
if ($thingy =~ /=HASH/ or $strval =~ /=HASH/) { } |
|
|
1 |
1 |
elsif ($thingy =~ /=ARRAY/ or $strval =~ /=ARRAY/) { } |
|
|
1 |
0 |
elsif ($thingy =~ /=SCALAR/ or $strval =~ /=SCALAR/) { } |
|
|
0 |
0 |
elsif ($name eq 'REF') { } |
|
76
|
3 |
0 |
$blessed ? : |
|
88
|
0 |
23 |
unless defined $str |
|
89
|
1 |
22 |
if $str =~ /[\x00-\x08\x0b\x0c\x0e-\x1f]/ |
|
96
|
1 |
21 |
$str eq '' ? : |