Mail::Abuse::Incident::Log - Parses generic logs into Mail::Abuse::Reports
use Mail::Abuse::Report; use Mail::Abuse::Incident::Log; my $i = new Mail::Abuse::Incident::Log; my $report = new Mail::Abuse::Report (incidents => [$i] );
This class parses generic logs that include a timestamp and an IP address in the same group of lines. Various configuration keys can influence the way this module works, as follows:
Controls how many consecutive lines to attempt a match on. More lines generally means more incidents parsed, but might lead to false matches. Its default value is 5 lines, which seems to work well enough. This should vary widely by site.
When set to a true value, produces some debugging information sent through
The following functions are provided for the customization of the behavior of the class.
Pushes all instances of log incidents into the given report, based on parsing of the text in the report itself.
Returns a list of objects of the same class, with the incident data (IP address, timestamp and other information) filled.
The IP address and timestamp searching is done in a consecutive number of lines. This number can be set with the
log lines variable, and defaults to 5 lines.
This module tends to get a significant number of, potentially false, incidents out of reports. Adjust the number of lines carefully based on the types of complaints that your site receives.
None by default.
Original version; created by h2xs 1.2 with options
-ACOXcfkn Mail::Abuse -v 0.01
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.
Luis E. MuÃ±oz <email@example.com>