Allow more characters in TLH definitions.

TLH may now also contain literal dots '.',
allowing for using second or third level
hierarchies as "TLH". To faciliate that,
'+' and '-' will be allowed, too.

Signed-off-by: Thomas Hochstein <thh@inter.net>

diff --git a/gatherstats.pl b/gatherstats.pl
index 6e41485..0a5a9a2 100755 (executable)
--- a/gatherstats.pl
+++ b/gatherstats.pl
@@ -91,7 +91,7 @@ if ($Conf{'TLH'}) {
   $TLH =~ s/(?<!\.)$/./;
   # check for illegal characters
   &Bleat(2,'Config error - illegal characters in TLH definition!')
   $TLH =~ s/(?<!\.)$/./;
   # check for illegal characters
   &Bleat(2,'Config error - illegal characters in TLH definition!')

-    if ($TLH !~ /^[a-zA-Z0-9:]+$/);
+    if ($TLH !~ /^[a-zA-Z0-9:+.-]+$/);

   # escape dots
   $TLH =~ s/\./\\./g;
   if ($TLH =~ /:/) {
   # escape dots
   $TLH =~ s/\./\\./g;
   if ($TLH =~ /:/) {