From: Jan Michel <michel@physik.uni-frankfurt.de>
Date: Tue, 28 Feb 2023 09:40:31 +0000 (+0100)
Subject: fix warning if value is 0 from command line
X-Git-Url: https://jspc29.x-matter.uni-frankfurt.de/git/?a=commitdiff_plain;h=37c4b81f6d0a12642dab4ca570165d7560b381fa;p=daqtools.git

fix warning if value is 0 from command line
---

diff --git a/xml-db/put.pl b/xml-db/put.pl
index 1fbedb9..6a3279b 100755
--- a/xml-db/put.pl
+++ b/xml-db/put.pl
@@ -76,12 +76,12 @@ foreach my $req (@request) {
     $file    = "$RealBin/cache/$ARGV[0].entity";
     $netaddr = $ARGV[1] || "";
     $name    = $ARGV[2] || "";
-    $value   = $ARGV[3] || "";
+    $value   = $ARGV[3] // "";
     }
 
   $value =~ s/m/\-/; #encoded negative values
 
-
+  
   
 ###############################
 #### Check arguments for validity
@@ -89,7 +89,7 @@ foreach my $req (@request) {
 
   die "Entity $file not found.\n" unless(-e $file) ;
 
-  
+  die "Value not given.\n" if $value eq "";
   
   # trim whitespace from netaddr
   $netaddr =~ s/^\s+|\s+$//g;