my $dsn =
 "Driver={Microsoft Access Driver (*.mdb)};" .
 "Dbq=c:\\your_nifty_folder\\your_nifty_db.mdb;" .
 "Uid=admin;" .
 "Pwd=";

my $dbh = DBI->connect("dbi:ODBC:$dsn");