Condition Coverage

File:blib/lib/Genealogy/Obituary/Parser.pm
Coverage:58.0%

line%coveragecondition
37367
ABdec
0X0
100
111
$sex eq "F" and $child =~ /(.+)\s+\((.+)\)/
413100
Adec
00
11
$family{'grandchildren'} and scalar @{$family{'grandchildren'};}
41433
ABdec
0X0
100
111
exists $family{'grandchildren'}[0] and length $family{'grandchildren'}[0] == 0
427100
ABdec
000
011
1X1
not defined $family{'grandchildren'} or $#{$family{"grandchildren"};} <= 0
44050
Adec
00
11
($t =~ /grandm\w+\sto\s+([^\.;]+)/i)[0] || ''
45250
Adec
00
11
$family{'sisters'} ||= []
52050
Adec
00
11
$family{'brothers'} ||= []
52675
ABCdec
0000
0011
01X1
1XX1
$family{'brothers'} or $family{'sisters'} or $family{'siblings'}
57367
ABdec
0X0
100
111
not exists $family{'brothers'} and $text =~ /\b(?:two|three|four)\s+brothers?,\s*(.+?)(?:,\s*a\s+(?:sister|half-sister)|;)/i
62550
Adec
00
11
$family{'spouse'} ||= []
63550
Adec
00
11
$family{'spouse'} ||= []
64050
Adec
00
11
$place // ""
64850
Adec
00
11
$family{'spouse'} ||= []
65250
Adec
00
11
$family{'spouse'} ||= []
66240
ABCDdec
0XXX0
10XX0
110X0
11100
11111
exists $family{'spouse'} and ref $family{'spouse'} eq "HASH" and defined $family{'spouse'}[0]{'location'} and $family{'spouse'}[0]{'location'} eq "the late"
70450
Adec
00
11
($text =~ /mother-in-law to\s+([^\.;]+)/i)[0] || ''
82433
ABdec
0X0
100
111
$dt and not $@