Yes.. Event Sinks can be created in Perl... It uses PerlScript.
I have one that I use to call SpamAssassin.
Enclose your script in SCRIPT tags like below, then name your sink with
a VBS extension, register it, and watch it run (you can't really see
it.. There's no console output).
<SCRIPT LANGUAGE="PerlScript" RUNAT="SERVER">
use Win32::OLE;
Win32::OLE->Initialize(Win32::OLE::COINIT_OLEINITIALIZE);
sub ISMTPOnArrival_OnArrival {
#expecting a $message object
my $message = $_[0];
my $status = 0;
#...and so on
}
</SCRIPT>
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On
> Behalf Of [EMAIL PROTECTED]
> Sent: Wednesday, November 29, 2006 9:58 PM
> To: perl-win32-users@listserv.ActiveState.com
> Subject: Event Sink script
>
> Hello, Sorry to ask again...
>
> Anyone has ever wrote a MS Exchange server's Event Sink
> script in Perl?
> Today I was requested to make a simple one but I don't like
> to write in VBScript.
>
> Any information is OK.
> Perl cann't be used for Event Sink?
>
> Regards,
> Hirosi Taguti
> _______________________________________________
> Perl-Win32-Users mailing list
> Perl-Win32-Users@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
>
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
