| line |
true |
false |
branch |
|
42
|
89 |
418 |
if (@_ == 4) { } |
|
46
|
0 |
418 |
if (@_ == 3) { } |
|
|
233 |
185 |
elsif (@_ == 2) { } |
|
69
|
0 |
2 |
if ($] < 5.008) |
|
76
|
0 |
2 |
if (our $AUTOLOAD ne 'Object::InsideOut::Metadata::new') |
|
87
|
7 |
28 |
if (exists $herit->{$pkg}) |
|
|
10 |
24 |
unless (&Scalar::Util::blessed($self)) |
|
|
16 |
0 |
if $arg eq ' ' |
|
|
0 |
16 |
if ($hash->{'_F'}) |
|
|
0 |
16 |
if ($hash->{'_M'}) |
|
|
0 |
16 |
if (defined(my $def = $hash->{'_D'})) |
|
|
4 |
4 |
if (my $pre = $hash->{'_P'}) |
|
|
8 |
4 |
if ($subtype =~ /^num(?:ber|eric)?$/i) |
|
|
4 |
8 |
if ($type =~ /^(.*)\((.+)\)$/i) |
|
|
8 |
0 |
if ($type =~ /^num(?:ber|eric)?$/i) { } |
|
|
0 |
0 |
elsif ($type =~ /^(?:list|array)$/i) { } |
|
|
8 |
4 |
elsif ($type =~ /^(array|hash)(?:_?ref)?$/i) { } |
|
|
12 |
0 |
if ($subtype) |
|
|
12 |
4 |
unless (ref $type) |
|
|
16 |
8 |
if (my $type = $hash->{'_T'}) |
|
|
14 |
0 |
if (ref $hash eq 'HASH') |
|
|
5 |
5 |
if (my $ia = $GBL->{'args'}{$pkg}) |
|
|
0 |
14 |
wantarray ? : |
|
|
7 |
7 |
unless (&Scalar::Util::blessed($self)) |
|
|
0 |
16 |
wantarray ? : |
|
|
360 |
1285 |
unless (&Scalar::Util::blessed($self)) |
|
|
82 |
1203 |
unless *{$pkg . '::' . $sym;}{'CODE'} |
|
|
94 |
1109 |
if $sym =~ /^[(_]/ |
|
|
80 |
1029 |
if $sym =~ /^(?:CLONE(?:_SKIP)?|DESTROY|import)$/ |
|
|
734 |
329 |
if ($foreign) |
|
|
34 |
2 |
if ($METADATA{$pkg}{$meth}{'hidden'}) |
|
|
2 |
34 |
if ($METADATA{$pkg}) |
|
|
2 |
325 |
if ($GBL->{'sub'}{'auto'}{$pkg}) |
|
|
245 |
80 |
if $meth eq 'AUTOLOAD' |
|
|
5 |
11 |
if ($METADATA{$pkg}) |
|
88
|
0 |
2 |
if $@ |