| line |
true |
false |
branch |
|
20
|
0 |
0 |
if $pkg =~ /^ (?:
DB | next | B | .+? ::::ISA (?: ::CACHE ) | Class::C3
) $/x |
|
26
|
0 |
0 |
if (exists do {
"${pkg}::"
}->{'__cag___attr_cache'} and ref(my $attr_stash = ${"${pkg}::__cag___attr_cache";}) eq 'HASH') |
|
36
|
0 |
0 |
if $attr_cache_active |
|
41
|
0 |
0 |
defined $_->{'weakref'} ? : |
|
58
|
341460 |
4 |
$_ =~ /^DBIC_/ ? : |
|
|
0 |
341464 |
$_ =~ /^[a-z]+$/ ? : |
|
66
|
8845 |
160251 |
if ($attr_cref_registry->{$code}) { } |
|
72
|
0 |
8845 |
if &refaddr($attr_cref_registry->{$code}{'weakref'}) != &refaddr($code) |
|
85
|
169096 |
0 |
if $attrs->{'dbic'} or $attrs->{'misc'} |
|
89
|
4 |
169092 |
if ($attrs->{'misc'}) |
|
97
|
2 |
2 |
unless $class->can('__attr_cache') |
|
101
|
2 |
2 |
unless $class->__attr_cache->{$code} |
|
108
|
169093 |
3 |
if ($attrs->{'dbic'}) |
|
112
|
160250 |
8843 |
unless $slot->{'attrs'} |
|
114
|
1 |
341459 |
unless $class->VALID_DBIC_CODE_ATTRIBUTE($_) |
|
137
|
169095 |
0 |
unless $attrs->{'builtin'} |
|
182
|
216384 |
9 |
unless $_[0]->_attr_cache->{$_[1]} |
|
184
|
1 |
20386 |
unless $$attr_cref_registry{$_[1]}{'attrs'} |
|
|
20387 |
196006 |
defined $$attr_cref_registry{$_[1]}{'weakref'} ? : |
|
193
|
33 |
216364 |
$self->can('__attr_cache') ? : |
|
194
|
216397 |
0 |
unless $self->maybe::next::method |