Class::DBI::SQLite - Extension to Class::DBI for sqlite
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
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.
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.
Class::DBI, DBD::SQLite