view release on metacpan or  search on metacpan

lib/SQLite/Abstract.pm  view on Meta::CPAN

    }
}

sub _check_table {
    my $self = shift;
    $self->{q{tablename}}
      or croak _err_msg("missing table name");
}

sub _err_msg {
    __PACKAGE__ . q/:/ . (caller)[2] . q/:/ . __LINE__ . q/: / . "@_";
}

sub err : lvalue {
    $_[1]
      ? $_[0]->{q{err}} = $_[1]
      : $_[0]->{q{err}};
}

sub AUTOLOAD {
    my $self  = shift;