News::GnusFilterA package for scoring usenet posts | |
Download |
News::GnusFilter Ranking & Summary
Advertisement
- License:
- Perl Artistic License
- Price:
- FREE
- Publisher Name:
- Joe Schaefer
- Publisher web site:
- http://search.cpan.org/~joesuf/
News::GnusFilter Tags
News::GnusFilter Description
A package for scoring usenet posts News::GnusFilter is a Perl module for scripting an inline message filter. It adds "Gnus-Warning:" headers when presented with evidence of atypical content or otherwise nonstandard formatting for usenet messages.News::GnusFilter should be drop-in compatible with other newsreaders that are capable of filtering a usenet posting through an external application prior to display. See the CONFIGURATION section below for descriptions of tunable parameters, and the MESSAGE TESTS section for descriptions of the exported subroutines.SYNOPSIS# ~/.gnusfilter - scoring script require 5.006; use strict; use News::GnusFilter qw/:tests groan references NSLOOKUP VERBOSE/; NSLOOKUP = ""; # disables nslookups for bogus_address test VERBOSE = 1; # noisier output for debugging my $goof = News::GnusFilter->set_score( { rethreaded => 80, no_context => 60, } );# standard tests - see MESSAGE TESTS for details missing_headers; bogus_address; annoying_subject; cross_post; mimes; lines_too_long; control_characters; miswrapped; misattribution; jeopardy_quoted; check_quotes; # runs multiple tests on quoted paragraphs bad_signature;# custom tests - see WRITING HEADERS and SCORING if (check_quotes and not references) { $goof->{rethreaded} = groan "Callously rethreaded"; } if (references and not check_quotes) { $goof->{no_context} = groan "Missing context"; }__END__Your GnusFilter script should be installed as a mime-decoder hook for gnus. Requirements: · Perl
News::GnusFilter Related Software