| line |
true |
false |
branch |
|
31
|
0 |
133 |
if $self->attributes->{$attribute->name}
|
|
48
|
0 |
1 |
unless $attr
|
|
52
|
0 |
1 |
if (ref $attr_args{'default'})
|
|
86
|
0 |
2 |
if (@_ % 2)
|
|
88
|
0 |
0 |
'CODE' eq ref $default ? :
|
|
95
|
0 |
2 |
ref $names ? :
|
|
96
|
0 |
2 |
if (my $is_extension = $name =~ s/^\+//) { }
|
|
114
|
0 |
2 |
if "CODE" eq ref($code = $spec{'builder'})
|
|
116
|
0 |
2 |
if "CODE" eq ref($code = $spec{'trigger'})
|
|
118
|
0 |
2 |
if "CODE" eq ref($code = $spec{'clone'})
|
|
135
|
1 |
0 |
unless exists $spec{'is'}
|
|
136
|
1 |
0 |
unless exists $spec{'required'}
|
|
148
|
1 |
0 |
$spec{'builder'} || exists $spec{'default'} ? :
|
|
149
|
1 |
0 |
unless exists $spec{'init_arg'}
|
|
150
|
0 |
1 |
if (defined $spec{'init_arg'} and not $spec{'init_arg'} =~ /^_/)
|
|
170
|
0 |
9 |
unless eval {
|
|
178
|
126 |
3 |
if (@lines)
|
|
179
|
19 |
107 |
$attr->type ? :
|
|
188
|
395 |
126 |
/\S/ ? :
|
|
220
|
33 |
81 |
unless keys %$attributes
|