in reply to Virus Honey Pot

As email is already out, there are just two things you can do with your database of infected machines (you are putting all the IP addresses into a flat text file or database, right ?):
perl -MHTTP::Daemon -MHTTP::Response -MLWP::Simple -e ' ; # The $d = new HTTP::Daemon and fork and getprint $d->url and exit;#spider ($c = $d->accept())->get_request(); $c->send_response( new #in the HTTP::Response(200,$_,$_,qq(Just another Perl hacker\n))); ' # web