Exemple d’ús de SQLite amb Perl, en més detall aquí.
#!/usr/bin/perl
use DBI
;
use strict
;
main
:
{
my $dbargs = {AutoCommit
=> 0
, PrintError
=> 1
};
my $dbh = DBI
->connect("dbi:SQLite:dbname=dem.db","","",$dbargs);
$dbh->do("insert into query (query_id, query_name,query_date) values (1,'stuff','2006-1 1-06')");
if ($dbh->err()) { die "$DBI::errstr\n"; }
$dbh->commit();
$dbh->disconnect();
}