The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

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

remove_unreported

Removes all unreported spams. Returns the number of removed spams as scalar value.

SEE ALSO

WWW::Mechanize

AUTHOR

Mathieu Arnold, <mat@cpan.org> new maintainer: Aleksander Adamowski, <cpan@olo.org.pl>

COPYRIGHT AND LICENSE

Copyright 2003,2007 by Mathieu Arnold, Aleksander Adamowski

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

2 POD Errors

The following errors were encountered while parsing the POD:

Around line 113:

Expected text after =item, not a number

Around line 117:

Expected text after =item, not a number