my $csvh = DBI->connect("DBI:CSV:f_dir=.;csv_sep_char=\t;csv_eol=\n;")
  or die($DBI::errstr);

$csvh->{'csv_tables'}->{'csv'} = {
     'file'             =>  file.csv };