[exim] How to delete all messages from one IP source

Hi, any one know a good and fast way to delete all the messages in the
queue that comes from one IP ?

The idea is to clean the queue from mails sent from a Spammer.

Currently I use this command, but is nor fast and not to effective:

/usr/sbin/exiqgrep -r '@' -i|awk '{print "echo -n "$1":;grep -o
200.74.190.225 /var/spool/exim/input/*/*"$1"*"}'|sh|awk -F: '{print
"/usr/sbin/exim -Mrm " $1}'|sh

Any improvements will be apreciated.

--
Saludos....

Daniel Bendersky.

------------------------------------------------------------------
Daniel Bendersky              Director de Operaciones y Tecnologia
dbenders@???                          http://www.netline.cl
NETLINE                                  Los Conquistadores # 2426
Oficina   : +56 2 410 2600           Providencia, Santiago - CHILE
Celular   : +56 9 998 9122               Fax2mail : +56 2 410 2651
Voice2mail: +56 2 410 2618
            "Success is a journey, not a destination"
------------------------------------------------------------------