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

##</code><code>##

my $dbh = DBI->connect("DBI:ODBC:driver={SQL Server};"
        . "SERVER=Bobs.pancake.hut;DATABASE=flapjacks;",
        "account","password");