line |
true |
false |
branch |
21
|
0 |
1 |
unless $ba |
22
|
0 |
1 |
if $ba != \&Moo::Object::BUILDARGS |
23
|
0 |
1 |
if $klass->can('FOREIGNBUILDARGS') |
25
|
0 |
1 |
unless $maybe_spec |
29
|
0 |
2 |
if ($spec{$attr}{'isa'} and not &blessed($spec{$attr}{'isa'})) |
32
|
0 |
2 |
if ($spec{$attr}{'isa'} and not $spec{$attr}{'isa'}->can('compiled_check')) |
35
|
0 |
2 |
if ($spec{$attr}{'default'} and not $spec{$attr}{'lazy'}) |
38
|
0 |
2 |
if ($spec{$attr}{'builder'} and not $spec{$attr}{'lazy'}) |
41
|
0 |
2 |
if (my(@unsafe) = grep({not $_ =~ /$safe_spec/;} keys %{$spec{$attr};})) |
55
|
0 |
1 |
unless $self->is_suitable_class($klass, \%spec) |
60
|
1 |
1 |
if $spec{$attr}{'required'} |
61
|
0 |
2 |
$spec{$attr}{'isa'} ? : |