new upstream release (3.3.0); modify package compatibility for Stretch

[ossec-hids.git] / contrib / active-list.pl

diff --git a/contrib/active-list.pl b/contrib/active-list.pl
index 57b6290..01f2c65 100644 (file)
--- a/contrib/active-list.pl
+++ b/contrib/active-list.pl
@@ -14,6 +14,7 @@
 use strict;
 use warnings;
 use DBI;
+use Regexp::IPv6 qw($IPv6_re);
 
 # -----------------------
 # DB access configuration
@@ -48,6 +49,8 @@ if ($ipAddr =~ m/^(\d\d?\d?)\.(\d\d?\d?)\.(\d\d?\d?)\.(\d\d?\d?)/) {
                exit 1;
        }
 }
+else if ($ipAddr =~ m/^$IPv6_re/) {
+}
 else {
        WriteLog("Invalid IP address: $ipAddr\n");
 }