File Coverage

File:blib/lib/Genealogy/Obituary/Lookup/obituaries.pm
Coverage:100.0%

linestmtbrancondsubtimecode
1package Genealogy::Obituary::Lookup::obituaries;
2
3
15
15
15
26
10
137
use strict;
4
15
15
15
19
10
226
use warnings;
5
15
15
15
17
8
38
use autodie qw(:all);
6
7
15
15
15
29303
883516
42
use Database::Abstraction;
8
9 - 17
=head1 NAME

Genealogy::Obituary::Lookup::obituaries - SQLite driver for the obituary database

=head1 VERSION

Version 0.21

=cut
18
19our $VERSION = '0.21';
20
21our @ISA = ('Database::Abstraction');
22
23 - 66
=head1 SYNOPSIS

This module is not intended to be used directly.  It is instantiated
internally by L<Genealogy::Obituary::Lookup>
as a driver to access the C<obituaries.sql> file.

    use Genealogy::Obituary::Lookup;
    my $obits = Genealogy::Obituary::Lookup->new();

=head1 DESCRIPTION

A thin subclass of L<Database::Abstraction> that points at the F<obituaries.sql>
SQLite database shipped with the distribution.
All query logic - SQL generation, caching, row mapping - is inherited from the parent class.

The database schema is:

    CREATE TABLE obituaries (
        first    VARCHAR NOT NULL,
        middle   VARCHAR,
        last     VARCHAR NOT NULL,
        maiden   VARCHAR,
        age      INTEGER,
        place    VARCHAR,
        newspaper VARCHAR NOT NULL,
        date     DATE    NOT NULL,
        source   CHAR    NOT NULL,   -- 'M', 'F', or 'L'
        page     VARCHAR NOT NULL    -- archive page number or direct URL
    );

=head1 LIMITATIONS

This class has no independent logic.  All limitations apply at the
L<Genealogy::Obituary::Lookup> level.

=head1 AUTHOR

Nigel Horne, C<< <njh at nigelhorne.com> >>

=head1 LICENSE AND COPYRIGHT

Copyright 2020-2026 Nigel Horne.  Released under GPL2.

=cut
67
681;