Branch Coverage
blib/lib/Business/NAB/CSV.pm
Criterion
Covered
Total
%
branch
3
4
75.0
line
true
false
branch
24
0
24
unless
my
$aoh
=
csv
(
"in"
,
\
$line
,
"headers"
,
[
"record_type"
,
$class
->
_attributes
]
)
31
5
17
if
(
$record
{
'record_type'
}
ne
$self
->
_record_type
)