Changeset 5 for trunk/dnsbl/dnsbl.cgi

Timestamp:

09/10/09 12:48:42 (15 years ago)

Author:

Kris Deugau

Message:

/trunk/dnsbl

Tweak IP-adding script, template, and the DNSBL::ipexists to show how
many times an IP has been reported

File:

• trunk/dnsbl/dnsbl.cgi (modified) (1 diff)

trunk/dnsbl/dnsbl.cgi

@@ -37 +37 @@
 if ($webvar{page} eq 'report') {
   $page->param(ip => $webvar{ip});
+  my $count = $dnsbl->ipexists($webvar{ip});
+  $page->param(nreports => $count) if $count;
   for (my $i=0; $i<3; $i++) {
     my ($block,$org) = $dnsbl->getcontainer($webvar{ip},$i);