my $dbh = DBI->connect("DBI:CSV:csv_sep_char=\\;") or die $DBI::errstr;