blib/lib/Gedcom/Individual.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 5 | 9 | 55.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
231 | 1 | 1 | 1 | $record->{'tag'} =~ /$f->[0]/ and $self->resolve($record->{'value'})->{'xref'} eq $xref |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
236 | 1 | 0 | 0 | $fam->tag_value('HUSB') or $fam->tag_value('WIFE') |
1 | 0 | 0 | $fam->tag_value('HUSB') or $fam->tag_value('WIFE') or $fam->tag_value('CHIL') |