#!/usr/bin/perl -w
use strict;
use Win32::OLE;

my ($acc) = Win32::OLE->new("Access.Application");
$acc->{Visible} = 1;
$acc->OpenCurrentDatabase("c:\\temp\\foo2.mdb");
$acc->DoCmd->RunMacro("mcroSayHello");
1;