| line |
true |
false |
branch |
|
45
|
246 |
0 |
$] >= 5.01 && require mro ? :
|
|
61
|
7762 |
0 |
if not $Test2::Util::HashBase::VERSION{$into} or $Test2::Util::HashBase::VERSION{$into} > $ver
|
|
69
|
164 |
6668 |
unless $Test2::Util::HashBase::ATTR_SUBS{$_}
|
|
72
|
6177 |
1585 |
$into->can('new') ? :
|
|
77
|
13959 |
21287 |
if $spec->{'strip'}
|
|
84
|
35034 |
212 |
if $spec->{'reader'}
|
|
85
|
21288 |
13958 |
if $spec->{'writer'}
|
|
86
|
12410 |
22836 |
if $spec->{'read_only'}
|
|
87
|
985 |
34261 |
if $spec->{'dep_writer'}
|
|
107
|
0 |
6 |
if (0.004 > ($Test2::Util::HashBase::VERSION{$_} || 0)) { }
|
|
112
|
6 |
0 |
$list ? :
|
|
126
|
469 |
5652 |
if (@_ == 1) { }
|
|
130
|
467 |
2 |
if ($type eq 'HASH') { }
|
|
134
|
0 |
2 |
unless $type eq 'ARRAY'
|
|
141
|
1 |
8 |
unless my $key = shift @attributes
|
|
153
|
2046 |
4074 |
unless exists $Test2::Util::HashBase::CAN_CACHE{$class}
|
|
155
|
5376 |
744 |
if $Test2::Util::HashBase::CAN_CACHE{$class}
|