| blib/lib/MARC/Batch.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 26 | 76.9 |
| line | true | false | branch |
|---|---|---|---|
| 65 | 5 | 12 | $type =~ /^MARC::File/ ? : |
| 68 | 0 | 17 | if $@ |
| 109 | 1 | 302 | if ($filter and ref $filter ne 'CODE') |
| 113 | 285 | 17 | if ($self->{'file'}) |
| 123 | 0 | 285 | if (@warnings) |
| 125 | 0 | 0 | if $self->{'strict'} |
| 128 | 271 | 14 | if ($rec) |
| 138 | 5 | 266 | if (@warnings) |
| 140 | 1 | 4 | if $self->{'strict'} |
| 151 | 7 | 24 | unless $self->{'filename'} = shift @{$$self{'filestack'};} |
| 155 | 0 | 24 | unless $self->{'file'} = $marcclass->in($self->{'filename'}) |
| 212 | 5 | 4 | if (@new) { } |
| 214 | 0 | 5 | if $self->{'warn'} |