Branch Coverage

blib/lib/MARC/Moose/Formater/UnimarcToMarc21.pm
Criterion Covered Total %
branch 0 22 0.0


line true false branch
211 0 0 if (my $equival = &first(sub {
213 0 0 if ($sep and @sf)
215 0 0 if $match eq "."
216 0 0 unless ($sf[-1][0] =~ /$match$/)
224 0 0 if (/e/) { }
0 0 elsif (/i/) { }
225 0 0 unless @sf
226 0 0 if ($sf[-1][0] =~ /a|n|p/) { }
235 0 0 if (@sf)
236 0 0 if ($sf[-1][0] eq 'h') { }
237 0 0 unless $sf[-1][1] =~ /,$/