line |
true |
false |
branch |
25
|
13 |
15 |
if ref $val ne 'HASH' |
26
|
14 |
1 |
if (my $field = $val->{'_F'}) |
28
|
0 |
14 |
if (add_dump_field('InitArgs', $name, $field, $d_flds->{$pkg}) eq 'conflict') |
38
|
0 |
23 |
unless (&Scalar::Util::blessed($self)) |
49
|
4 |
47 |
if (my $dumper = $dumpers->{$pkg}) { } |
|
43 |
4 |
elsif ($fld_refs->{$pkg}) { } |
60
|
33 |
38 |
if (ref $field eq 'HASH') { } |
61
|
24 |
9 |
if (exists $$field{$$self}) |
65
|
32 |
6 |
if (defined $$field[$$self]) |
69
|
1 |
0 |
if ($weak->{$field} and exists $dump{$pkg}{$name}) |
77
|
2 |
3 |
if (ref $field eq 'HASH') { } |
78
|
2 |
0 |
if (exists $$field{$$self}) |
82
|
3 |
0 |
if (defined $$field[$$self]) |
86
|
0 |
0 |
if ($weak->{$field} and exists $dump{$pkg}{$field}) |
97
|
8 |
15 |
if ($_[0]) |
116
|
9 |
0 |
if ($input) |
117
|
5 |
4 |
if ($input eq 'Object::InsideOut') { } |
|
0 |
4 |
elsif (&Scalar::Util::blessed($input)) { } |
126
|
0 |
9 |
unless ($input) |
131
|
1 |
8 |
unless (ref $input) |
138
|
0 |
1 |
if ($@ or @errs) |
150
|
0 |
9 |
if (ref $input ne 'ARRAY') |
156
|
0 |
9 |
if (not defined $class or ref $dump ne 'HASH') |
165
|
0 |
14 |
unless (exists $GBL->{'tree'}{'td'}{$pkg}) |
171
|
2 |
12 |
if (my $pumper = $GBL->{'dump'}{'pumper'}{$pkg}) { } |
179
|
19 |
2 |
if (my $field = $GBL->{'dump'}{'fld'}{$pkg}{$fld_name}{'fld'}) { } |
182
|
2 |
0 |
if ($fld_name =~ /^(?:HASH|ARRAY)/) { } |