From: Jan Michel <j.michel@gsi.de>
Date: Fri, 7 Feb 2020 16:27:43 +0000 (+0100)
Subject: allow underscore in xml-db names
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=690013deb2f702d8f33c951de5538727baafa1d3;p=daqtools.git

allow underscore in xml-db names
---

diff --git a/xml-db/get.pl b/xml-db/get.pl
index 899a21e..7abfefd 100755
--- a/xml-db/get.pl
+++ b/xml-db/get.pl
@@ -121,9 +121,9 @@ foreach my $req (@request) {
 
 
   $slice = undef;
-  if ($name =~ m/^([a-zA-Z0-9]+)\.(\d+)$/) {
+  if ($name =~ m/^([a-zA-Z0-9\_]+)\.(\d+)$/) {
     $name = $1; $slice = $2;
-  } elsif ($name =~ m/^([a-zA-Z0-9]+)$/) {
+  } elsif ($name =~ m/^([a-zA-Z0-9\_]+)$/) {
     $name = $1; $slice = undef;
   } else {
     die "Could not parse name $name \n";