SYNOPSIS
package Film;
use base qw(Class::DBI::SQLite);
__PACKAGE__->set_db('Main', 'dbi:SQLite:dbname=dbfile', '', '');
__PACKAGE__->set_up_table('Movies');
package main;
my $film = Film->create({
name => 'Bad Taste',
title => 'Peter Jackson',
});
my $id = $film->id; # auto-incremented
DESCRIPTION
Class::DBI::SQLite is an extension to Class::DBI for DBD::SQLite. It allows you to populate an auto-incremented row id after insert.The "set_up_table" method automates the setup of columns and primary key(s) via the SQLite PRAGMA statement.
AUTHOR
Tatsuhiko Miyagawa <[email protected]>"set_up_table" implementation by Tomohiro Ikebe <[email protected]>
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.