In article <[EMAIL PROTECTED]> [EMAIL PROTECTED] writes:
>BTW, could it be possible to provide an alternate interface to submit spam?
>(like the 'report-listspam AT lists.debian.org' we can bounce spam from the
>mailing lists to)
Here's a short script I use to process messages sent to [EMAIL PROTECTED]
that report spam. It uses the existing interface.
#!/usr/bin/perl
use strict;
use LWP::Simple;
my @mess = <STDIN>;
my $mess = join('', @mess);
my @bugs = $mess =~ /[^\d](\d{3,8})/gs;
foreach my $bug (@bugs) {
my $ans = get("http://bugs.debian.org/cgi-bin/bugspam.cgi?bug=$bug";);
}
--
Blars Blarson [EMAIL PROTECTED]
http://www.blars.org/blars.html
With Microsoft, failure is not an option. It is a standard feature.
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
