$MAPI = Win32::OLE->new('MAPI.Session');
die "Could instantiate MAPI Session: " . Win32::OLE::LastError() if (! defined($MAPI));