| line |
true |
false |
branch |
|
33
|
28 |
4 |
scalar @value > 1 ? : |
|
45
|
4 |
4 |
$isa eq 'hash' ? : |
|
|
8 |
1 |
scalar @args > 1 ? : |
|
|
4 |
9 |
$isa eq 'ordered_hash' ? : |
|
|
13 |
14 |
if scalar @args |
|
54
|
0 |
3 |
unless (scalar $spec) |
|
57
|
2 |
1 |
if (caller 1) |
|
85
|
0 |
4 |
unless $object{$inherit} |
|
91
|
13 |
0 |
if ($value and $object{$extend}{'has'}{$name}{'is'} eq 'rw' || [split(/::/, [caller 1]->[3], 0)]->[-1] =~ /^new|build|set_defaults|auto_build$/) |
|
96
|
0 |
13 |
if $object{$extend}{'has'}{$name}{'coerce'} |
|
98
|
0 |
13 |
if $object{$extend}{$name}{'required'} |
|
102
|
0 |
13 |
if $object{$extend}{'has'}{$name}{'trigger'} |
|
146
|
1 |
11 |
if $object{$called}{'lazy'} |
|
148
|
12 |
0 |
if $object{$called}{'auto_build'} |
|
149
|
0 |
12 |
if $self->can("build") |
|
150
|
1 |
11 |
if $object{$called}{'delay'} |
|
161
|
0 |
32 |
if ($name =~ s/^_([a-zA-Z].*)/$1/) |
|
165
|
1 |
31 |
if ($ref eq 'ARRAY') { } |
|
|
1 |
30 |
elsif ($ref eq 'HASH') { } |
|
171
|
0 |
32 |
if (not $attribute_extend and $object{$called}{'has'}{$name}) |
|
175
|
0 |
32 |
if (scalar @attrs % 2) |
|
182
|
9 |
23 |
unless $object{$called}{'has'}{$name}{'is'} |
|
185
|
1 |
31 |
unless defined $object{$called}{'has'}{$name}{'isa'} |
|
187
|
14 |
18 |
if ($object{$called}{'has'}{$name}{'default'}) |
|
188
|
0 |
14 |
if ($object{$called}{'has'}{$name}{'default'} =~ /^1$/) { } |
|
|
14 |
0 |
elsif (ref $object{$called}{'has'}{$name}{'default'} eq 'CODE') { } |
|
195
|
0 |
0 |
$object{$called}{'has'}{$name}{'type'} eq 'ordered_hash' ? : |
|
199
|
0 |
32 |
if ($object{$called}{'has'}{$name}{'required'}) |
|
203
|
4 |
28 |
if ($object{$called}{'has'}{$name}{'lazy'}) |
|
207
|
1 |
31 |
if ($object{$called}{'has'}{$name}{'delay'}) |
|
213
|
36 |
0 |
if (@_ > 1 and $object{$called}{'has'}{$name}{'is'} eq 'rw' || [split(/::/, [caller 1]->[3], 0)]->[-1] =~ /^new|build|set_defaults|auto_build$/) |
|
217
|
35 |
1 |
if (defined $value) { } |
|
219
|
2 |
33 |
if $object{$called}{'has'}{$name}{'coerce'} |
|
221
|
0 |
35 |
if $object{$called}{$name}{'required'} |
|
225
|
0 |
35 |
if $object{$called}{'has'}{$name}{'trigger'} |
|
231
|
32 |
0 |
unless $attribute_extend |
|
238
|
1 |
5 |
unless $object{$called}{'has'}{$_} |
|
245
|
0 |
1 |
unless $self->can($_) |
|
254
|
0 |
0 |
unless $object{$called}{'method'}{$_} |
|
263
|
7 |
19 |
$object{$called}{'has'}{$_}{'type'} eq 'ordered_hash' ? : |
|
|
26 |
24 |
if defined $object{$called}{'has'}{$_}{'value'} |
|
270
|
0 |
12 |
scalar @_ == 1 ? : |
|
272
|
17 |
0 |
if ($self->can($_)) |
|
282
|
0 |
5 |
ref $object{$called}{'has'}{$_}{$type} || !($object{$called}{'has'}{$_}{$type} =~ /^1$/) ? : |
|
291
|
0 |
0 |
if (not defined $value) |
|
303
|
0 |
6 |
if (ref $value) |
|
314
|
0 |
12 |
if (ref $value or not $value =~ /^\d+$/) |
|
325
|
0 |
0 |
if (ref $value or not $value =~ /^\d+\.\d+$/) |
|
336
|
0 |
0 |
if (ref $value ne "SCALAR") |
|
347
|
2 |
0 |
unless (ref $value) |
|
350
|
0 |
2 |
if (ref $value ne "SCALAR") |
|
364
|
4 |
2 |
if (ref $value ne "Hash::Typed") |
|
367
|
0 |
4 |
unless ($hash) |
|
384
|
1 |
12 |
if (ref $hash->{$k} eq 'Hash::Typed') { } |
|
392
|
1 |
13 |
unless (exists $value->{$k}) |
|
405
|
0 |
15 |
if (ref $value ne "HASH") |
|
416
|
0 |
7 |
if (ref $value ne "ARRAY") |
|
425
|
0 |
0 |
if (ref $value ne "GLOB") |
|
436
|
0 |
0 |
if (not ref $value or ref !($value =~ /SCALAR|ARRAY|HASH|GLOB/)) |
|
446
|
174 |
85 |
if (not $ref) { } |
|
|
0 |
85 |
elsif ($ref eq 'SCALAR') { } |
|
|
29 |
56 |
elsif ($ref eq 'ARRAY') { } |
|
|
49 |
7 |
elsif ($ref eq 'HASH') { } |
|
454
|
7 |
7 |
scalar @_ == 1 ? : |