diff options
Diffstat (limited to 'collectors/dhcptail.pl')
| -rwxr-xr-x | collectors/dhcptail.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/collectors/dhcptail.pl b/collectors/dhcptail.pl index 857bf5e..5fd8cf0 100755 --- a/collectors/dhcptail.pl +++ b/collectors/dhcptail.pl @@ -7,7 +7,7 @@ use strict; use Data::Dumper; use warnings; -my $year = 2016; +my $year = 2018; my %months = ( Jan => 1, @@ -27,7 +27,7 @@ my %months = ( my $realtime = 0; my ($dbh, $q,$check); $dbh = nms::db_connect(); -$q = $dbh->prepare("INSERT INTO dhcp (dhcp_server,switch,time,ip,mac) VALUES($nms::config::dhcp_id,(SELECT switch FROM switches WHERE ?::inet << subnet4 ORDER BY sysname LIMIT 1),?,?,?)"); +$q = $dbh->prepare("INSERT INTO dhcp (dhcp_server,switch,time,ip,mac) VALUES($nms::config::dhcp_id,(SELECT switch FROM switches WHERE ?::inet << subnet4 and deleted = false ORDER BY sysname LIMIT 1),?,?,?)"); $check = $dbh->prepare("SELECT max(time)::timestamp - ?::timestamp < '0s'::interval as doit FROM dhcp where dhcp_server = $nms::config::dhcp_id;"); open(SYSLOG, "tail -n 9999999 -F /var/log/messages |") or die "Unable to tail syslog: $!"; |