Condition Coverage

blib/lib/PICA/Record.pm
Criterion Covered Total %
condition 41 57 71.9


and 3 conditions

line !l l&&!r l&&r condition
90 499 15 7 $#_ == 0 and ref \$first eq 'SCALAR'
132 53 3 1 $test and not @specs
261 8860 0 175 $f->tag eq '101@' and defined $f->sf('a')
319 62 323 2703 $prevocc and $prevocc eq $1
380 489 41 7278 @_ and UNIVERSAL::isa($_[0], 'PICA::Field')
384 494 36 5 @_ and UNIVERSAL::isa($_[0], 'PICA::Record')
392 22 0 55 @_ and defined $_[0]
22 14 41 @_ and defined $_[0] and length $_[0] == 1
617 1 0 1 @_ == 1 && UNIVERSAL::isa($_[0], 'PICA::Record')
632 0 0 1 @_ == 1 && UNIVERSAL::isa($_[0], 'PICA::Record')
639 0 3 0 @r == 1 and UNIVERSAL::isa($_[0], 'PICA::Field')
652 3 0 0 wantarray and defined $options{'Limit'}
657 0 0 3 $record and not $record->empty

or 2 conditions

line l !l condition
263 0 175 $holdings{$curiln} //= []
295 265 0 $a->iln // '0'
265 0 $b->iln // '0'

or 3 conditions

line l !l&&r !l&&!r condition
78 535 0 0 $class || ref $class
90 2 4 508 ref $first eq 'GLOB' or eval { do { $first->isa('IO::Handle') } }
143 27 11 5 not $test or &$test($maybe)
431 3 1 2 UNIVERSAL::isa($_[0], 'PICA::Field') or ref $_[0] eq 'CODE'