Trying write code that work for both UNIX and MSWin32 Mail.
This runs on Solaris but doesn't work on windows
$win32ole = 'Win32::OLE qw(in with)';
$winconst = "Win32::OLE::Const 'Microsoft Outlook'";
if ($^O eq 'MSWin32'){
require $win32ole;
require $winconst;
$Win32::OLE::Warn = 3; # die on errors...
}
If I use this work fine for windows but want compile on Solaris.
if ($^O eq 'MSWin32'){
use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft Outlook';
$Win32::OLE::Warn = 3; # die on errors...
}
I get the following error:
What do I need to do to fix this? The following is the error I get on
Win32:
Can't locate Win32::OLE qw(in with) in @INC (@INC contains:
/package0/filpods/loaders . C:\Program Files\ActiveState Komodo
3.1\dbgp\perllib C:\Program Files\ActiveState Perl Dev Kit 6.0\lib\
C:/Perl/lib C:/Perl/site/lib) at
Y:\FILPODS\DB\loaders\factsheet_extract.pl line 30.
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
