$dbh = DBI->connect("dbi:ODBC:DSN","user","passwd"); print "Connected to: ", $dbh->{"Name"};