1 package DBIx::Class::PK::Auto::SQLite;
6 use base qw/DBIx::Class/;
8 __PACKAGE__->load_components(qw/PK::Auto/);
11 return $_[0]->result_source->storage->dbh->func('last_insert_rowid');
18 DBIx::Class::PK::Auto::SQLite - Automatic Primary Key class for SQLite
22 # In your table classes
23 __PACKAGE__->load_components(qw/PK::Auto::SQLite Core/);
24 __PACKAGE__->set_primary_key('id');
28 This class implements autoincrements for SQLite.
32 Matt S. Trout <mst@shadowcatsystems.co.uk>
36 You may distribute this code under the same terms as Perl itself.