| 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') |