Branch Coverage
blib/lib/Class/Data/Accessor.pm
Criterion
Covered
Total
%
branch
13
14
92.9
line
true
false
branch
10
2
5
if
(
ref
$declaredclass
)
14
1
4
if
(
$attribute
eq
'DESTROY'
)
19
2
15
if
(
ref
$_
[
0
])
20
1
1
if
@_
>
1
21
0
1
if
exists
$_
[
0
]{
$attribute
}
26
2
14
if
@_
>
1
and
$wantclass
ne
$declaredclass
29
3
11
if
@_
>
1