Net::Milter 0.08

Net::Milter provides a masquerade as the MTA to communicate with email filters through a milter interface.

SYNOPSIS

use Net::Milter;
my $milter = new Net::Milter;
$milter->open(127.0.0.1,5513,tcp);

my ($milter_version,$returned_actions_ref,$returned_protocol_ref) =
$milter->protocol_negotiation();

my (@results) = $milter->send_header(From,martin@localhost);
foreach (@results) {
if ($$_{action} eq reject) {exit;}
}
Also see example in scripts directory.

Perl module to provide a pure Perl implementation of the MTA part the milter interface. The goal of this module is to allow other email systems to easily integrate with the various email filters that accept content via milter.

This implementation of milter is developed from the description provided by Todd Vierling, cvs.sourceforge.net/viewcvs.py/pmilter/pmilter/doc/milter-protocol.txt?rev=1.2 and from examining the tcp output from Sendmail.