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] =~ /,$/ |