Branch Coverage

blib/lib/MARC/Field/Normalize/NACO.pm
Criterion Covered Total %
branch 18 34 52.9


line true false branch
20 0 44 unless scalar @_ > 0
0 44 unless ($Method::Signatures::mutc{'cache'}{'Str'} ||= 'Method::Signatures'->_make_constraint('Str'))->check($s)
0 44 if exists $args{'keep_first_comma'} and not +($Method::Signatures::mutc{'cache'}{'Bool'} ||= 'Method::Signatures'->_make_constraint('Bool'))->check($keep_first_comma)
0 44 if keys %args
0 44 if scalar @_ > 3
44 22 22 if ($keep_first_comma) { }
62 0 15 unless scalar @_ > 0
0 15 unless ($Method::Signatures::mutc{'cache'}{'ArrayRef'} ||= 'Method::Signatures'->_make_constraint('ArrayRef'))->check($subfs)
0 15 if scalar @_ > 1
73 0 12 unless scalar @_ > 0
0 12 unless ($Method::Signatures::mutc{'cache'}{'MARC::Field'} ||= 'Method::Signatures'->_make_constraint('MARC::Field'))->check($f)
12 0 exists $args{'subfields'} ? :
0 12 if keys %args
0 12 if scalar @_ > 3
78 0 2 unless scalar @_ > 0
0 2 unless ($Method::Signatures::mutc{'cache'}{'MARC::Record'} ||= 'Method::Signatures'->_make_constraint('MARC::Record'))->check($r)
0 2 if scalar @_ > 1