Branch Coverage

blib/lib/Tie/Hash/CustomStorage.pm
Criterion Covered Total %
branch 29 48 60.4


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}