use strict;
use DBI;
my $dbh = DBI->connect("dbi:ODBC:driver=Microsoft Access Driver (*.mdb, *.accdb);dbq=a.mdb")
         or         die "Can't connect to Database: $DBI::errstr";