my $dbh = DBI->connect("dbi:ODBC:$dsnname", $username, $password);