Fix error with more recent perl

Can't use 'defined(%hash)' (Maybe you should just omit the defined()?) at /home/webstump/live-ulm/webstump/scripts/webstump.pl line 40.: /usr/lib/userv/ucgi/cgi/ucgi

diff --git a/webstump/scripts/webstump.pl b/webstump/scripts/webstump.pl
index ba5343ea70bd793f78a887d0d4a4ebe5dc577520..dfe7dc38e0b08fd139718d2824202e0687f0cee9 100755 (executable)
--- a/webstump/scripts/webstump.pl
+++ b/webstump/scripts/webstump.pl
@@ -37,7 +37,7 @@ $html_mode = "yes";
 
 $command = "";
 
-if( defined %request ) {
+if(  %request ) {
   &disinfect_request;
   $command = $request{'action'} if( defined $request{'action'} );
 }