Genealogy::Obituary::Lookup

NAME

Genealogy::Obituary::Lookup - Lookup an obituary

VERSION

Version 0.20

SYNOPSIS

Looks up obituaries

use Genealogy::Obituary::Lookup;
my $info = Genealogy::Obituary::Lookup->new();
# ...

SUBROUTINES/METHODS

new

Creates a Genealogy::Obituary::Lookup object.

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

Accepts the following optional arguments:

• cache - Passed to Database::Abstraction

• config_file

  Points to a configuration file which contains the parameters to new(). The file can be in any common format including YAML, XML, and INI. This allows the parameters to be set at run time.

• directory

  The directory containing the file obituaries.sql. If only one argument is given to new(), it is taken to be directory.

• logger - Passed to Database::Abstraction

search

Searches the database.

# Returns an array of hashrefs
my @smiths = $obits->search(last => 'Smith');       # You must at least define the last name to search for

print $smiths[0]->{'first'}, "\n";

Supports two return modes:

• List context

  Returns an array of hash references.

• Scalar context

  Returns a single hash reference, or undef if there is no match.

FORMAL SPECIFICATION

INPUT

{
  'last' => {
    type => 'string',
    min => 1,
    max => 100,
    matches => qr/^[\w\-]+$/  # Allow hyphens in surnames
  }, 'first' => {
    type => 'string',
    optional => 1,
    min => 1,
    max => 100
  }, 'middle' => {
    type => 'string',
    optional => 1,
    min => 1,
    max => 100
  }, 'age' => {
    type => 'integer',
    optional => 1,
    min => 0,
    max => 120
  }
}

OUTPUT

Argument error: croak No matches found: undef

Scalar context:

{
  'type' => 'hashref',
  'min' => 1
}

List context:

{
  'type' => 'array',
  'min' => 1
}

AUTHOR

Nigel Horne, <njh at bandsman.co.uk>

BUGS

Ancestry has removed the archives. The first 18 pages are on Wayback machine, but the rest is lost.

SEE ALSO

Database::Abstraction

• The Obituary Daily Times

  https://sites.rootsweb.com/~obituary/

• Archived Rootsweb data

  https://wayback.archive-it.org/20669/20231102044925/https://mlarchives.rootsweb.com/listindexes/emails?listname=gen-obit

• Funeral Notices

  https://www.funeral-notices.co.uk

• Recent data

  https://www.freelists.org/list/obitdailytimes

• Older data

  https://obituaries.rootsweb.com/obits/searchObits

SUPPORT

This module is provided as-is without any warranty.

You can find documentation for this module with the perldoc command.

perldoc Genealogy::Obituary::Lookup

You can also look for information at:

• MetaCPAN

  https://metacpan.org/release/Genealogy-Obituary-Lookup

• RT: CPAN's request tracker

  https://rt.cpan.org/NoAuth/Bugs.html?Dist=Genealogy-Obituary-Lookup

• CPAN Testers' Matrix

  http://matrix.cpantesters.org/?dist=Genealogy-Obituary-Lookup

• CPAN Testers Dependencies

  http://deps.cpantesters.org/?module=Genealogy::Obituary::Lookup

LICENSE AND COPYRIGHT

Copyright 2020-2025 Nigel Horne.

This program is released under the following licence: GPL2