use strict;
use warnings;
use DBI;

my $db_file   = 'C:\...\database.edb';
my $dbh = DBI->connect
  ('dbi:ADO:Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' . $db_file)
  or die $DBI::errstr;