blib/lib/MARC/File/SAX.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 16 | 27 | 59.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
125 | 20 | 6 | 0 | substr($ldr, 9, 1) eq 'a' and $self->{'toMARC8'} |
140 | 282 | 1084 | 515 | exists $self->{'subcode'} and $self->{'subcode'} ne '' |
451 | 915 | 0 | $self->{'tag'} and $self->{'tag'} eq 'LDR' || $self->{'tag'} < 10 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
25 | 0 | 27 | 0 | ref $class || $class |
81 | 0 | 0 | 1 | $name eq 'leader' or $name eq 'controlfield' |
0 | 1 | 0 | $name eq 'leader' or $name eq 'controlfield' or $name eq 'datafield' | |
1 | 0 | 0 | $name eq 'leader' or $name eq 'controlfield' or $name eq 'datafield' or $name eq 'subfield' | |
140 | 26 | 87 | 802 | $self->{'tag'} eq 'LDR' || $self->{'tag'} < 10 |
515 | 0 | 1366 | exists $self->{'subcode'} and $self->{'subcode'} ne '' or $self->{'tag'} and $self->{'tag'} eq 'LDR' || $self->{'tag'} < 10 |