| line | % | coverage | condition |
|---|
| 204 | 67 | | defined $spouse and $spouse ne "" |
| 205 | 67 | | defined $location and $location ne "" |
| 373 | 67 | | $sex eq "F" and $child =~ /(.+)\s+\((.+)\)/ |
| 414 | 100 | | $family{'grandchildren'} and scalar @{$family{'grandchildren'};} |
| 415 | 33 | | exists $family{'grandchildren'}[0] and length $family{'grandchildren'}[0] == 0 |
| 428 | 100 | | not defined $family{'grandchildren'} or $#{$family{"grandchildren"};} <= 0 |
| 442 | 50 | | ($t =~ /grandm\w+\sto\s+([^\.;]+)/i)[0] || '' |
| 455 | 50 | | $family{'sisters'} ||= [] |
| 523 | 50 | | $family{'brothers'} ||= [] |
| 529 | 75 | | $family{'brothers'} or $family{'sisters'} or $family{'siblings'} |
| 576 | 67 | | not exists $family{'brothers'} and $text =~ /\b(?:two|three|four)\s+brothers?,\s*(.+?)(?:,\s*a\s+(?:sister|half-sister)|;)/i |
| 628 | 50 | | $family{'spouse'} ||= [] |
| 638 | 50 | | $family{'spouse'} ||= [] |
| 643 | 50 | | $place // "" |
| 651 | 50 | | $family{'spouse'} ||= [] |
| 655 | 50 | | $family{'spouse'} ||= [] |
| 665 | 40 | | A | B | C | D | dec |
|---|
| 0 | X | X | X | 0 | | 1 | 0 | X | X | 0 | | 1 | 1 | 0 | X | 0 | | 1 | 1 | 1 | 0 | 0 | | 1 | 1 | 1 | 1 | 1 |
| exists $family{'spouse'} and ref $family{'spouse'} eq "HASH" and defined $family{'spouse'}[0]{'location'} and $family{'spouse'}[0]{'location'} eq "the late" |
| 707 | 50 | | ($text =~ /mother-in-law to\s+([^\.;]+)/i)[0] || '' |
| 836 | 67 | | ref $item eq "HASH" and exists $item->{'name'} |
| 844 | 50 | | $Genealogy::Obituary::Parser::b->{'name'} // "" |
| 50 | | $Genealogy::Obituary::Parser::a->{'name'} // "" |
| 870 | 33 | | $dt and not $@ |