use DBI;

my $dsn = qq{dbi:SQLite:dbname=my.db};
my $dbh = DBI->connect($dsn, '', '');