blib/lib/Gedcom/Date/Simple.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 15 | 20 | 75.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
200 | 4 | 15 | 2 | $self->{'known'}{'d'} &&= exists $p{'days'} |
201 | 2 | 1 | 18 | $self->{'known'}{'m'} &&= exists $p{'months'} |
202 | 0 | 0 | 21 | $self->{'known'}{'y'} &&= exists $p{'years'} |
line | l | !l | condition |
---|---|---|---|
28 | 0 | 56 | $cal ||= 'GREGORIAN' |
36 | 45 | 8 | $d ||= 1 |
45 | 53 | 0 | $d || 15 |
108 | 10 | 1 | $type ||= 'abt' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
37 | 49 | 4 | 0 | $month ||= $months{$cal}[6] |