[Mimedefang] Website listing spammed stocks
Martin Blapp
mb at imp.ch
Mon Aug 6 23:06:12 EDT 2007
> Now if there were only some way to harness this.
What about this ?
wget http://www.qwoter.com/spam.php
cat spam.php | perl -e 'while (<STDIN>) {$_ =~ s/star-big-off.gif/\n/g; print
$_;}' | perl -e 'while (<STDIN>) { if ($_ =~ /symbol=(.[^"]+)">(.[^<]+)/) {print
$1 . " " . $2 . "\n";}}' | sort | uniq
You could even make SpamAssassin Rules with it.
Martin
More information about the MIMEDefang
mailing list