Help-Site Computer Manuals
Software
Hardware
Programming
Networking
  Algorithms & Data Structures   Programming Languages   Revision Control
  Protocols
  Cameras   Computers   Displays   Keyboards & Mice   Motherboards   Networking   Printers & Scanners   Storage
  Windows   Linux & Unix   Mac

Mail::Abuse::Reader::GoogleGroups
Reads Mail::Abuse::Report from NANAS via Google Groups

Mail::Abuse::Reader::GoogleGroups - Reads Mail::Abuse::Report from NANAS via Google Groups


NAME

Mail::Abuse::Reader::GoogleGroups - Reads Mail::Abuse::Report from NANAS via Google Groups


SYNOPSIS


  use Mail::Abuse::Report;

  use Mail::Abuse::Reader::GoogleGroups;

  my $r = new Mail::Abuse::Reader::GoogleGroups;

  my $report = new Mail::Abuse::Report (reader => $r);


DESCRIPTION

THIS CODE SHOULD NOT BE USED IN PRODUCTION YET. SEE bin/google-gather INSTEAD, FOR AN ALTERNATE MECHANISM OF FETCHING REPORTS FROM NANAS VIA GOOGLE GROUPS.

This module uses the news.admin.net-abuse.sightings archive kindly provided by the Google(tm) Groups service to feed public complaints into the Mail::Abuse package.

The general idea is that a search is going to be performed and each result will be fed into the Mail::Abuse engine. The parameters of the process can be configured by the following keys in the configuration file.

google groups search
Regexp to search for in the text of each article.

google groups max messages
Maximum number of messages to read in a single run. Defaults to 50.

google groups oldest message
Controls the maximum age of a message. Messages that are older (accorging to its Date: header) will be skipped and not counted. This defaults to five days.

google groups server
The name of the Google(tm) Groups server to use. Defaults to groups.google.com.

google groups proxy
The proxy server to use.

debug google groups
When set to a true value, causes debug information to be sent to STDERR.

The following methods are implemented within this class.

read($report)
Populates the text of the given $report using the ->text method. Must return true if succesful or false otherwise.

EXPORT

None by default.


HISTORY

  1. 01
  2. 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).

Programminig
Wy
Wy
yW
Wy
Programming
Wy
Wy
Wy
Wy