| blib/lib/Gedcom/Individual.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 5 | 21 | 23.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 231 | 1 | 1 | 1 | $record->{'tag'} =~ /$f->[0]/ and $self->resolve($record->{'value'})->{'xref'} eq $xref |
| 391 | 0 | 0 | 0 | $rc and $rc =~ /cousin/ |
| 394 | 0 | 0 | 0 | $father and $father->_stepsabove($person2, 0) > 0 |
| 0 | 0 | 0 | $mother and $mother->_stepsabove($person2, 0) > 0 |
| 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') | |
| 390 | 0 | 0 | 0 | $rel->{$n} || +($sex eq 'M' ? $m_rel : $f_rel)->{$n} |