NAME

WWW::Mechanize::SpamCop - SpamCop reporting automation.

SYNOPSIS

    use WWW::Mechanize::SpamCop;

    $s = WWW::Mechanize::SpamCop->new(
	login    => 'login@spamcop.net',
	passwd => 'passwd'
    );

    $s->report_one;

    $s->report_all;

ABSTRACT

WWW::Mechanize::SpamCop is used to automate spam reporting on spamcop.net's web site.

DESCRIPTION

new

Create a new WWW::Mechanize::SpamCop object

The required arguments are login and passwd, you can also pass it a host, defaulting to 'www.spamcop.net:80' (the :80 is needed because of the authentication), a realm, defaulting to 'your SpamCop account' which is the domain's realm for autentication. and a report default to 'Report Now', which is the name of the link on the web page.

report_one

Report one spam

returns :

undef

no spam was found

1

if a spam was reported

2

if the spam was too old

report_all

Report all waiting spams

If called in a scalar context, returns the number of spam reported. If in an array context, returns an array containing the number of reported spams and the number of old spams (not reported).

SEE ALSO

WWW::Mechanize

AUTHOR

Mathieu Arnold, <mat@cpan.org>

COPYRIGHT AND LICENSE

Copyright 2003 by Mathieu Arnold

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.