Branch Coverage

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


line true false branch
20 0 35 unless @_ > 0
0 35 unless ($Method::Signatures::mutc{'cache'}{'Str'} ||= 'Method::Signatures'->_make_constraint('Str'))->check($_[0])
0 35 if exists $args{'keep_first_comma'} and not +($Method::Signatures::mutc{'cache'}{'Bool'} ||= 'Method::Signatures'->_make_constraint('Bool'))->check($args{'keep_first_comma'})
0 35 if keys %args
0 35 if @_ > 3
44 17 18 if ($keep_first_comma) { }
60 0 11 unless @_ > 0
0 11 unless ($Method::Signatures::mutc{'cache'}{'ArrayRef'} ||= 'Method::Signatures'->_make_constraint('ArrayRef'))->check($_[0])
0 11 if @_ > 1
71 0 8 unless @_ > 0
0 8 unless ($Method::Signatures::mutc{'cache'}{'MARC::Field'} ||= 'Method::Signatures'->_make_constraint('MARC::Field'))->check($_[0])
8 0 exists $args{'subfields'} ? :
0 8 if keys %args
0 8 if @_ > 3
76 0 2 unless @_ > 0
0 2 unless ($Method::Signatures::mutc{'cache'}{'MARC::Record'} ||= 'Method::Signatures'->_make_constraint('MARC::Record'))->check($_[0])
0 2 if @_ > 1