The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Geo::TigerLine::Record::Accessor - Accessor generation for Geo::TigerLine::Record::*

SYNOPSIS

  package Geo::TigerLine::Record::1001001;

  use base qw(Geo::TigerLine::Record::Accessor);

  # Generate accessors for each field of the record.
  foreach my $def (values %{__PACKAGE__->Fields}) {
      __PACKAGE__->mk_accessor($def);
  }

  # Turn off input checks, makes inserting raw data faster.
  __PACKAGE__->input_checks(0);

DESCRIPTION

Allows accessor generation for all the fields of each TIGER/Line record type. You probabably shouldn't be here.

This is a subclass of Class::Accessor.

Additional Methods

input_check
  Class->input_check($true_or_false);
  $true_or_false = Class->input_check;
  $true_or_false = $obj->input_check;

If true, turns on the input checks done each time a value is set. False turns them off.

This setting is inherited.

By default, the checks are on.

AUTHOR

Michael G Schwern <schwern@pobox.com>

SEE ALSO

Class::Accessor, Geo::TigerLine::Record