NAME
News::Article::Cancel - a module to generate accurate cancel messages
SYNOPSIS
use News::Article::Cancel;
my $article = new News::Article::Cancel(\*STDIN);
next if $article->verify_resurrected($GROUP);
my $from = $article->header('from') || "";
my $subject = $article->header('subject') || "";
my $xauth = $article->header('x-auth') || "";
my $mid = $article->header('message-id') || "";
my $cancel = $article->make_cancel( $NAME, "moder",
"From: $from", "Subject: $subject", "Message-ID: $mid",
"X-Auth: $xauth");
DESCRIPTION
Creates a cancel message based on a Usenet article, which may be posted normally to delete a message. Also adds a verification for reposted messages in moderated newsgroups.
USAGE
News::Article::Cancel is class that inherits News::Article and adds two new functions: make_cancel() and verify_resurrected().
Article Methods
- make_cancel ( CANCELLER TYPE [TEXT] )
-
Creates a cancel message based on the current article and the given
TYPE
.CANCELLER
is the email address of the poster, and is required;TEXT
is an array of lines which will be appended to cancel message's body.TYPE
determines several characteristics of the cancel message, and must be one of the following (not case sensitive):- spam - Spam, EMP, or ECP cancel.
- spew - Spew cancel.
- aup - Cancel by poster's service provider.
- personal - Original article posted by user.
- mmf - Make.Money.Fast cancel.
- binary - Binary in a non-binary group.
- moderator - Cancel by group moderator.
- retromod - Cancel by group retromoderator.
- forgery - Forged article.
- request - Cancel by poster's request.
make_cancel returns a News::Article object if successful, or an error message if not.
NOTES
Standard article manipulation information can be read in the News::Article manpages.
Cancel messages are not toys. Before using this module, all users should have a good idea of how cancels work, what they are used for, and what the results of their actions may be. This information can be found in the Cancel Messages FAQ, posted monthly to news.answers and available on the web at <URL:http://www.killfile.org/faqs/cancel.html>.
TODO
Make sure I've got all of the different cancel types taken care of.
SEE ALSO
pgpmoose, at http://www.killfile.org/~tskirvin/software/pgpmoose/
AUTHOR
Written by Tim Skirvin <tskirvin@killfile.org>, based on a shell script by Chris Lewis <clewis@bnr.ca>.
COPYRIGHT
Copyright 2000-2004 by Tim Skirvin <tskirvin@killfile.org>. This code may be redistributed under the same terms as Perl itself.
1 POD Error
The following errors were encountered while parsing the POD:
- Around line 243:
You forgot a '=back' before '=head1'