line |
true |
false |
branch |
31
|
1 |
3 |
unless defined *{$_[0] . '::';} |
34
|
0 |
5 |
if (defined $args{'autovivify'}) |
40
|
1 |
4 |
if (defined $args{'tie_hash'}) |
43
|
0 |
1 |
ref $p ? : |
51
|
1 |
4 |
if (defined $args{'class_storage'}) { } |
|
2 |
2 |
elsif (defined $args{'tie_storage'}) { } |
|
1 |
1 |
elsif (defined $args{'init_storage'}) { } |
54
|
0 |
1 |
ref $p ? : |
62
|
2 |
0 |
if defined $init_obj |
65
|
1 |
0 |
$autovivify ? : |
72
|
2 |
0 |
ref $p ? : |
79
|
2 |
2 |
if defined $init_obj |
97
|
0 |
5 |
if %args |
111
|
0 |
0 |
if (defined $obj) { } |
127
|
6 |
6 |
unless defined $$self{'data'}{$idx} |
146
|
7 |
0 |
unless defined $h_obj |
149
|
0 |
0 |
$h_obj->can('get_data_ref') ? : |
|
0 |
0 |
defined $$h_obj{'data'} ? : |
|
0 |
0 |
defined $$h_obj{'DATA'} ? : |
|
0 |
0 |
$h_obj->isa('Tie::StdHash') ? : |
165
|
0 |
1 |
unless defined $$self{'data'}{$idx} |
178
|
2 |
5 |
if (defined $$self{'class_storage'} and defined $data) |
180
|
1 |
1 |
if (ref $data eq $$self{'class_storage'}) { } |
193
|
4 |
1 |
unless defined $$self{'data'}{$idx} |