Handle IP address regexps

diff --git a/syslog-ng/syslog-ng-lib.pl b/syslog-ng/syslog-ng-lib.pl
index f2c47b4..1f96887 100644 (file)
--- a/syslog-ng/syslog-ng-lib.pl
+++ b/syslog-ng/syslog-ng-lib.pl
@@ -397,6 +397,7 @@ sub quoted_value
 local ($str) = @_;
 return $str =~ /^[a-z\_][a-z0-9\_]*$/i ? $str :
        $str =~ /^\d+\.\d+\.\d+\.\d+$/ ? $str :
+       $str =~ /^[0-9\[\]\-]+\.[0-9\[\]\-]+\.[0-9\[\]\-]+\.[0-9\[\]\-]+$/ ? $str :
        $str eq "," || $str eq ".." ? $str :
        $str =~ /^\d+$/ ? $str :
        $str =~ /\"/ ? "'$str'" : "\"$str\"";