9 my $db_file = "t/var/DBIxClass.db";
11 unlink($db_file) if -e $db_file;
12 unlink($db_file . "-journal") if -e $db_file . "-journal";
13 mkdir("t/var") unless -d "t/var";
15 my $dsn = "dbi:SQLite:${db_file}";
17 return DBICTest::Schema->compose_connection('DBICTest' => $dsn);