use strict;
use warnings;
use DBI;
my $file = 'c:/path/to/access/database.mdb';
my $dsn = 'dbi:ODBC:driver=Microsoft Access Driver (*.mdb);dbq=' . $file;
my $dbh = DBI->connect($dsn,undef,undef);