Changeset 647 for trunk

Timestamp:

06/23/14 17:36:50 (11 years ago)

Author:

Kris Deugau

Message:

/trunk

Tweak compact-recs.pl to use new database function and not choke on non-IP
values in the val column.

File:

• trunk/compact-recs.pl (modified) (1 diff)

trunk/compact-recs.pl

@@ -103 +103 @@
   eval {
     my $getsth = $dbh->prepare("SELECT record_id,host,val FROM records ".
-        "WHERE (type = 12 OR type > 65000) AND CAST(val AS inet) << ?");
+        "WHERE (type = 12 OR type > 65000) AND inetlazy(val) << ?");
     my $delsth = $dbh->prepare("DELETE FROM records WHERE record_id = ?");
     $getsth->execute($cidr);