Branch Coverage
blib/lib/Statocles/Person.pm
Criterion
Covered
Total
%
branch
6
6
100.0
line
true
false
branch
90
2
438
if
@args
==
1
and
ref
$args
[
0
]
eq
'HASH'
92
340
98
if
(
@args
==
1
)
93
6
334
if
(
$args
[
0
] =~
s/\s*<([^>]+)>\s*//
)
{
}