Sendmail::Milter is a Perl interface to sendmail's Mail Filter API.
SYNOPSIS
use Sendmail::Milter;
my %my_milter_callbacks =
(
'connect' => &my_connect_callback,
'helo' => &my_helo_callback,
'envfrom' => &my_envfrom_callback,
'envrcpt' => &my_envrcpt_callback,
'header' => &my_header_callback,
'eoh' => &my_eoh_callback,
'body' => &my_body_callback,
'eom' => &my_eom_callback,
'abort' => &my_abort_callback,
'close' => &my_close_callback,
);
sub my_connect_callback;
sub my_helo_callback;
sub my_envfrom_callback;
sub my_envrcpt_callback;
sub my_header_callback;
sub my_eoh_callback;
sub my_body_callback;
sub my_eom_callback;
sub my_abort_callback;
sub my_close_callback;
BEGIN:
{
# Get myfilter's connection information
# from /etc/mail/sendmail.cf
Sendmail::Milter::auto_setconn("myfilter");
Sendmail::Milter::register("myfilter",
%my_milter_callbacks, SMFI_CURR_ACTS);
Sendmail::Milter::main();
# Never reaches here, callbacks are called from Milter.
}
Sendmail::Milter is a Perl extension to sendmail's Mail Filter API (Milter).
Note: You need to have a Perl 5.6 or later interpreter built with -Dusethreads.
Product's homepage
Requirements:
· Perl