This program will only grab the most recent (last) Received: line's IP
address.
It can be modified to do more if you like, or you could just have it dump
its output to a file listing IPs and every night run it through sort & uniq.
-x-CUT-x
#!/usr/bin/perl
$names="name1|name2|name3";
while (<>)
This program will only grab the most recent (last) Received: line's IP
address.
It can be modified to do more if you like, or you could just have it dump
its output to a file listing IPs and every night run it through sort & uniq.
-x-CUT-x
#!/usr/bin/perl
$names="name1|name2|name3";
while (<>)
wolfgang zeikat <[EMAIL PROTECTED]> wrote:
>so we keep receiving mails from all over this lovely planet for the non
>existent users
>michellep tonyak jenniferd barbik melindaa gabriellej barbis doloresz
>melindab junem
>(exciting isn't it)
>
>i would like to process them automatically via a .qmai
sadly, one of our domains seems to have gotten onto one or more of those
"Buy * Million first class spam recipients' email addresses NOW" lists/CDs.
so we keep receiving mails from all over this lovely planet for the non
existent users
michellep tonyak jenniferd barbik melindaa gabriellej barbis
