NAME

Mail::Abuse::Incident::Received - Parses Received: headers in an abuse report

SYNOPSIS

  use Mail::Abuse::Report;
  use Mail::Abuse::Incident::Received;

  my $i = new Mail::Abuse::Incident::Received;
  my $report = new Mail::Abuse::Report (incidents => [$i] );

DESCRIPTION

This class parses standard Received: headers included in a given abuse report.

Entries in the configuration file can control the behavior of this module. The following entries are recognized:

debug received

When set to a true value, causes some debug information to be produced via warn().

The functions provided by this module, are described below

parse($report)

Parses all the Received: headers, creating an instance with each combination of IP address and timestamp found.

Returns a list of objects of the same class, with the incident data (IP address, timestamp and other information) filled.

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).