| line |
true |
false |
branch |
|
66
|
2 |
40 |
unless UNIVERSAL::isa($caller, 'Class::Meta') or UNIVERSAL::isa($caller, 'Class::Meta::Constructor') |
|
72
|
1 |
39 |
if @_ % 2 |
|
78
|
2 |
37 |
unless $p{'name'} |
|
80
|
1 |
36 |
if $p{'name'} =~ /\W/ |
|
87
|
2 |
34 |
if exists $$class{'ctors'}{$p{'name'}} or exists $$class{'meths'}{$p{'name'}} |
|
93
|
9 |
25 |
if (exists $p{'view'}) { } |
|
95
|
3 |
3 |
unless $p{'view'} == 4 or $p{'view'} == 2 or $p{'view'} == 3 or $p{'view'} == 1 |
|
106
|
1 |
30 |
if ($p{'code'}) { } |
|
108
|
0 |
1 |
unless $ref and $ref eq 'CODE' |
|
113
|
15 |
15 |
unless exists $p{'create'} |
|
117
|
1 |
30 |
if ($p{'caller'}) { } |
|
119
|
1 |
0 |
unless $ref and $ref eq 'CODE' |
|
122
|
4 |
26 |
unless $p{'create'} |
|
132
|
28 |
2 |
if ($p{'view'} > 1) |
|
133
|
27 |
1 |
unless $p{'view'} == 3 |
|
135
|
27 |
1 |
if ($p{'view'} > 2) |
|
137
|
26 |
1 |
if $p{'view'} == 4 |
|
230
|
1 |
46 |
unless my $code = $$self{'caller'} |
|
260
|
1 |
25 |
unless UNIVERSAL::isa($caller, 'Class::Meta') or UNIVERSAL::isa($caller, 'Class::Meta::Constructor') |
|
266
|
0 |
25 |
unless delete $$self{'create'} or $$self{'code'} |
|
273
|
0 |
119 |
ref $_[0] ? : |
|
283
|
2 |
116 |
@_ % 2 && ref $_[-1] eq 'CODE' ? : |
|
297
|
134 |
252 |
if (exists $p{$key} and $attr->authz >= 3) { } |
|
|
252 |
0 |
elsif (not exists $$new{$key}) { } |
|
311
|
0 |
2 |
$#attributes > 0 ? : |
|
323
|
0 |
1 |
$#miss > 0 ? : |
|
334
|
1 |
24 |
if ($self->view == 2) { } |
|
|
1 |
23 |
elsif ($self->view == 1) { } |
|
339
|
3 |
6 |
unless (caller)->isa($pkg) |
|
348
|
5 |
2 |
unless caller eq $pkg |