The best place for dropping packets is at the firewall, just add a rule to DROP packets from those addresses.

Now, to get perl back involved, write a script to modify the firewall rules as it automatically detects log file spammers.

-Scott