Changeset 14 for trunk


Ignore:
Timestamp:
01/19/10 16:42:34 (14 years ago)
Author:
Kris Deugau
Message:

/trunk/dnsbl

Add count to (almost) all IP address display bits

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/dnsbl/dnsbl.cgi

    r11 r14  
    141141            $out .= "      <div class=iplist>\n";
    142142            while (my @data4 = $sthiplist->fetchrow_array) {
    143               $out .= "        $data4[0]<br>\n";
     143#       ip        | count | s4list |             added
     144              $out .= "        $data4[0] ($data4[1])<br>\n";
    144145              $ipseen{$data4[0]} = 1;
    145146            }
    … …  
    152153          $out .= "    <div class=iplist>\n";
    153154          while (my @data4 = $sthiplist->fetchrow_array) {
    154             $out .= "      $data4[0]<br>\n";
     155#       ip        | count | s4list |             added
     156            $out .= "      $data4[0] ($data4[1])<br>\n";
    155157            $ipseen{$data4[0]} = 1;
    156158          }
    … …  
    169171          $out .= "    <div class=iplist>\n";
    170172          foreach (@newips) {
    171             $out .= "      $_<br>\n";
     173            $out .= "      $_ ($ipseen{$_})<br>\n";
    172174          }
    173175          $out .= "    </div>\n";
    … …  
    180182      $out .= "  <div class=iplist>\n";
    181183      while (my @data4 = $sthiplist->fetchrow_array) {
    182         $out .= "    $data4[0]<br>\n";
     184#       ip        | count | s4list |             added
     185        $out .= "    $data4[0] ($data4[1])<br>\n";
    183186        $ipseen{$data4[0]} = 1;
    184187      }
Note: See TracChangeset for help on using the changeset viewer.