use strict;
use DBI;
my $db = DBI->connect('DBI:ODBC:myDSN')
	or die "Could not connect to database: " . DBI->errstr;

##</code><code>##

use strict;
use DBI;
my $db = DBI->connect('DBI:ODBC:myDSN','user','passwd')
	or die "Could not connect to database: " . DBI->errstr;