summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
1194fb5)
use constant DBI_DRIVER => 'SQLite';
use constant DATASOURCE => $ENV{BEERDB_DATASOURCE} || 't/beerdb.db';
use constant DBI_DRIVER => 'SQLite';
use constant DATASOURCE => $ENV{BEERDB_DATASOURCE} || 't/beerdb.db';
BEGIN {
my $dbi_driver = DBI_DRIVER;
if ($dbi_driver =~ /^SQLite/) {
BEGIN {
my $dbi_driver = DBI_DRIVER;
if ($dbi_driver =~ /^SQLite/) {