Xueron Nee wrote:
> Hi Azfar Hashmi,
>
> Here is a simple perl script to do this :)
>
> #!/usr/bin/perl -w
> [snip]
>   

a less sofisticated shell version:

#!/bin/sh

ip_list=`grep -v "^#" /path/to/ips`
rbl_zones=`grep -v "^#" /path/to/rbls`

check_ip()
{
    ip=$1
    zone=$2

    rev_ip=`echo $ip |  awk -F. '{print $4 "." $3 "." $2 "." $1}'`
    host $rev_ip.$zone | grep -m 1 "has address"
}


for ip in $ip_list; do
  for zone in $rbl_zones; do
    check_ip $ip $zone
  done
done






-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
AMaViS-user mailing list
AMaViS-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amavis-user
AMaViS-FAQ:http://www.amavis.org/amavis-faq.php3
AMaViS-HowTos:http://www.amavis.org/howto/

Reply via email to