From 6a64c22e1253b33208fe2c4367dcdd0893aaa31e Mon Sep 17 00:00:00 2001 From: Markus Lude Date: Sat, 28 Oct 2017 19:06:16 +0200 Subject: [PATCH] fix warnings: wiki.pl: Use of uninitialized value $UseModWiki::UserID in substitution (s///) at /var/www/cgi-bin/wiki.pl line 450. wiki.pl: Use of uninitialized value $UseModWiki::UserID in numeric lt (<) at /var/www/cgi-bin/wiki.pl line 451. warnings on normal page view --- wiki.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/wiki.pl b/wiki.pl index 376b4eb..99bd5fe 100755 --- a/wiki.pl +++ b/wiki.pl @@ -446,7 +446,7 @@ sub InitCookie { undef $q->{'.cookies'}; # Clear cache if it exists (for SpeedyCGI) %UserData = (); # Fix for persistent environments. %UserCookie = $q->cookie($CookieName); - $UserID = $UserCookie{'id'}; + $UserID = $UserCookie{'id'} || 0; $UserID =~ s/\D//g; # Numeric only if ($UserID < 200) { $UserID = 111;