| blib/lib/Genealogy/ObituaryDailyTimes.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 24 | 33.3 |
| line | true | false | branch |
|---|---|---|---|
| 44 | 0 | 5 | ref $_[0] eq 'HASH' ? : |
| 46 | 1 | 4 | if (not defined $class) { } |
| 1 | 3 | elsif (ref $class) { } | |
| 82 | 1 | 2 | ref $_[0] eq 'HASH' ? : |
| 84 | 3 | 0 | unless (defined $params{'last'}) |
| 91 | 0 | 0 | unless (defined $self->{'obituaries'}) |
| 95 | 0 | 0 | if (wantarray) |
| 102 | 0 | 0 | if (defined(my $obit = $self->{'obituaries'}->fetchrow_hashref(\%params))) |
| 114 | 0 | 0 | unless (defined $page) |
| 119 | 0 | 0 | unless (defined $source) |
| 123 | 0 | 0 | if ($source eq "M") |
| 126 | 0 | 0 | if ($source eq "F") |