diff -Nurd Sources.orig/Lib/FUNC.pm Sources/Lib/FUNC.pm --- Sources.orig/Lib/FUNC.pm Sun Jul 14 00:47:08 2002 +++ Sources/Lib/FUNC.pm Mon Feb 3 09:39:48 2003 @@ -101,7 +101,7 @@ my $sid = $iB::IN{'sid'} || $iB::COOKIES->{$iB::INFO->{'COOKIE_ID'}.'skin'}; # Make sure it only contains a number - $sid =~ s/^(\d+)$/$1/; + $sid =~ s/^(\d+)$/$1/ or die "invalid sid value"; # Make sure we have a default skin set @@ -188,7 +188,8 @@ # Make sure the cookie data is legal if ($iB::COOKIES->{$iB::INFO->{'COOKIE_ID'}.'lang'}) { - $iB::COOKIES->{$iB::INFO->{'COOKIE_ID'}.'lang'} =~ s/^([\d\w]+)$/$1/; + $iB::COOKIES->{$iB::INFO->{'COOKIE_ID'}.'lang'} =~ s/^([\d\w]+)$/$1/ + or die "invalid lang cookie value"; } $default = $iB::COOKIES->{$iB::INFO->{'COOKIE_ID'}.'lang'}