my $dbh = DBI->connect("DBI:CSV:f_dir=".$FindBin::Bin);