NAME

Mail::Abuse::Filter - Filter incidents depending on various criteria

SYNOPSIS

  package Mail::Abuse::Filter::MyFilter;
  use Mail::Abuse::Filter;

  use base 'Mail::Abuse::Filter';
  sub criteria { ... }
  package main;

  my $f = new Mail::Abuse::Filter::MyFilter;

  $report->filter([$f]);

DESCRIPTION

This class allows for the specification of a set of restrictions placed on the Mail::Abuse::Incidents that are considered interesting. Anything not interesting will be removed from a report.

The following functions are provided for the customization of the behavior of the class.

criteria($report, $incident)

This function receives a Mail::Abuse::Report and a Mail::Abuse::Incident object. It returns a true value if the incident should be handled or false otherwise. This function will be generally called by the Mail::Abuse::Report object when requested to filter its events.

Derived classes must override this method.

EXPORT

None by default.

HISTORY

0.01

Original version; created by h2xs 1.2 with options

  -ACOXcfkn
        Mail::Abuse
        -v
        0.01

LICENSE AND WARRANTY

This code and all accompanying software comes with NO WARRANTY. You use it at your own risk.

This code and all accompanying software can be used freely under the same terms as Perl itself.

AUTHOR

Luis E. Muñoz <luismunoz@cpan.org>

SEE ALSO

perl(1).