my $dbh = DBI->connect('DBI:CSV:f_dir=.;csv_quote_char=~;')  or die ...