my $dbh = DBI->connect("DBI:ODBC:$dstring","","");