line |
true |
false |
branch |
32
|
27 |
4 |
scalar @value > 1 ? : |
44
|
4 |
4 |
$isa eq 'hash' ? : |
|
8 |
1 |
scalar @args > 1 ? : |
|
4 |
9 |
$isa eq 'ordered_hash' ? : |
|
13 |
14 |
if scalar @args |
58
|
0 |
3 |
unless $object{$inherit} |
64
|
10 |
0 |
if ($value and $object{$extend}{'has'}{$name}{'is'} eq 'rw' || [split(/::/, [caller 1]->[3], 0)]->[-1] =~ /^new|build|set_defaults|auto_build$/) |
69
|
0 |
10 |
if $object{$extend}{'has'}{$name}{'coerce'} |
71
|
0 |
10 |
if $object{$extend}{$name}{'required'} |
75
|
0 |
10 |
if $object{$extend}{'has'}{$name}{'trigger'} |
119
|
1 |
7 |
if $object{$called}{'lazy'} |
121
|
8 |
0 |
if $object{$called}{'auto_build'} |
122
|
0 |
8 |
if $self->can("build") |
123
|
1 |
7 |
if $object{$called}{'delay'} |
134
|
0 |
31 |
if ($name =~ s/^_([a-zA-Z].*)/$1/) |
138
|
1 |
30 |
if ($ref eq 'ARRAY') { } |
|
1 |
29 |
elsif ($ref eq 'HASH') { } |
144
|
0 |
31 |
if (not $attribute_extend and $object{$called}{'has'}{$name}) |
148
|
0 |
31 |
if (scalar @attrs % 2) |
155
|
8 |
23 |
unless $object{$called}{'has'}{$name}{'is'} |
158
|
1 |
30 |
unless defined $object{$called}{'has'}{$name}{'isa'} |
160
|
13 |
18 |
if ($object{$called}{'has'}{$name}{'default'}) |
161
|
0 |
13 |
if ($object{$called}{'has'}{$name}{'default'} =~ /^1$/) { } |
|
13 |
0 |
elsif (ref $object{$called}{'has'}{$name}{'default'} eq 'CODE') { } |
168
|
0 |
0 |
$object{$called}{'has'}{$name}{'type'} eq 'ordered_hash' ? : |
172
|
0 |
31 |
if ($object{$called}{'has'}{$name}{'required'}) |
176
|
4 |
27 |
if ($object{$called}{'has'}{$name}{'lazy'}) |
180
|
1 |
30 |
if ($object{$called}{'has'}{$name}{'delay'}) |
186
|
32 |
0 |
if (defined $value and $object{$called}{'has'}{$name}{'is'} eq 'rw' || [split(/::/, [caller 1]->[3], 0)]->[-1] =~ /^new|build|set_defaults|auto_build$/) |
191
|
2 |
30 |
if $object{$called}{'has'}{$name}{'coerce'} |
193
|
0 |
32 |
if $object{$called}{$name}{'required'} |
197
|
0 |
32 |
if $object{$called}{'has'}{$name}{'trigger'} |
200
|
31 |
0 |
unless $attribute_extend |
207
|
1 |
5 |
unless $object{$called}{'has'}{$_} |
214
|
0 |
1 |
unless $self->can($_) |
223
|
0 |
0 |
unless $object{$called}{'method'}{$_} |
232
|
7 |
15 |
$object{$called}{'has'}{$_}{'type'} eq 'ordered_hash' ? : |
|
22 |
24 |
if defined $object{$called}{'has'}{$_}{'value'} |
239
|
0 |
8 |
scalar @_ == 1 ? : |
241
|
15 |
0 |
if ($self->can($_)) |
251
|
0 |
5 |
ref $object{$called}{'has'}{$_}{$type} || !($object{$called}{'has'}{$_}{$type} =~ /^1$/) ? : |
260
|
0 |
0 |
if (not defined $value) |
272
|
0 |
6 |
if (ref $value) |
283
|
0 |
12 |
if (ref $value or not $value =~ /^\d+$/) |
294
|
0 |
0 |
if (ref $value or not $value =~ /^\d+\.\d+$/) |
305
|
0 |
0 |
if (ref $value ne "SCALAR") |
316
|
2 |
0 |
unless (ref $value) |
319
|
0 |
2 |
if (ref $value ne "SCALAR") |
334
|
0 |
15 |
if (ref $value ne "HASH") |
345
|
0 |
7 |
if (ref $value ne "ARRAY") |
354
|
0 |
0 |
if (ref $value ne "GLOB") |
365
|
0 |
0 |
if (not ref $value or ref !($value =~ /SCALAR|ARRAY|HASH|GLOB/)) |
375
|
145 |
66 |
if (not $ref) { } |
|
0 |
66 |
elsif ($ref eq 'SCALAR') { } |
|
22 |
44 |
elsif ($ref eq 'ARRAY') { } |
|
44 |
0 |
elsif ($ref eq 'HASH') { } |
383
|
7 |
4 |
scalar @_ == 1 ? : |