From: Hades DAQ <hadaq@hades33.gsi.de>
Date: Sun, 25 May 2014 12:52:01 +0000 (+0200)
Subject: get.pl update
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=ae07544596577288cb932aaa5a06aa19e57c40c7;p=daqtools.git

get.pl update
---

diff --git a/xml-db/get.pl b/xml-db/get.pl
index 5cbfacb..8be211c 100755
--- a/xml-db/get.pl
+++ b/xml-db/get.pl
@@ -5,6 +5,8 @@ use feature "switch";
 use Time::HiRes qw( time usleep );
 use CGI::Carp qw(fatalsToBrowser);
 
+no if $] >= 5.017011, warnings => 'experimental::smartmatch';
+
 use if (!defined $ENV{'QUERY_STRING'}), warnings;
 use if (!defined $ENV{'QUERY_STRING'}), Pod::Usage;
 use if (!defined $ENV{'QUERY_STRING'}), Text::TabularDisplay;