my $dbh = DBI->connect ("dbi:CSV:f_ext=.csv/r;f_encoding=utf-8", undef, undef, { RaiseError => 1 });


##</code><code>##

my $dbh = DBI->connect ("dbi:Pg:dbname=test", ...);


##</code><code>##

$ env PGDATABASE=merijn perl -MDBI -wE'say DBI->connect("dbi:Pg:")->{Name}||"not known"'
not known
$