| line |
true |
false |
branch |
|
37
|
377 |
0 |
if (eval {
|
|
56
|
377 |
0 |
$] >= 5.01 && require mro ? :
|
|
81
|
887 |
24 |
if not $DBIx::QuickORM::Util::HashBase::VERSION{$into} or $DBIx::QuickORM::Util::HashBase::VERSION{$into} > $ver
|
|
92
|
193 |
718 |
if (my $have_new = $into->can("new"))
|
|
94
|
48 |
145 |
unless $new_lookup->{$have_new}
|
|
99
|
863 |
48 |
$add_new ? :
|
|
|
0 |
145 |
unless $DBIx::QuickORM::Util::HashBase::ATTR_SUBS{$_}
|
|
105
|
10865 |
4199 |
if (ref $v eq 'CODE') { }
|
|
128
|
5230 |
310 |
if $spec->{'strip'}
|
|
137
|
3889 |
1651 |
if ($spec->{'reader'})
|
|
138
|
0 |
3889 |
if ($use_gen) { }
|
|
|
3889 |
0 |
elsif (not $spec->{'no_xs'}) { }
|
|
149
|
310 |
5230 |
if ($spec->{'writer'}) { }
|
|
|
0 |
5230 |
elsif ($spec->{'read_only'}) { }
|
|
|
0 |
5230 |
elsif ($spec->{'dep_writer'}) { }
|
|
150
|
0 |
310 |
if ($use_gen) { }
|
|
|
310 |
0 |
elsif (not $spec->{'no_xs'}) { }
|
|
161
|
0 |
0 |
$use_gen ? :
|
|
164
|
0 |
0 |
$use_gen ? :
|
|
167
|
0 |
5540 |
if ($spec->{'custom'})
|
|
185
|
0 |
0 |
if (0.004 > ($DBIx::QuickORM::Util::HashBase::VERSION{$_} || 0)) { }
|
|
190
|
0 |
0 |
$list ? :
|
|
207
|
145 |
718 |
$__pre_init ? :
|
|
210
|
145 |
718 |
$__post_init ? :
|
|
217
|
117 |
864 |
if (@_ == 1) { }
|
|
221
|
117 |
0 |
if ($type eq 'HASH') { }
|
|
225
|
0 |
0 |
unless $type eq "ARRAY"
|
|
232
|
0 |
0 |
unless my $key = shift @attributes
|
|
244
|
292 |
689 |
unless exists $DBIx::QuickORM::Util::HashBase::CAN_CACHE{$class}
|
|
247
|
952 |
29 |
if $DBIx::QuickORM::Util::HashBase::CAN_CACHE{$class}
|
|
260
|
839 |
24 |
unless defined &{"${into}::new";}
|
|
261
|
839 |
24 |
unless defined &{"${into}::add_pre_init";}
|
|
262
|
839 |
24 |
unless defined &{"${into}::add_post_init";}
|
|
263
|
839 |
24 |
unless defined &{"${into}::_pre_init";}
|
|
264
|
839 |
24 |
unless defined &{"${into}::_post_init";}
|