Global symbol "%hash" requires explicit package name at /home/www/localhost/projekt/zeichnen.cgi line 23.
Execution of /home/www/localhost/projekt/zeichnen.cgi aborted due to compilation errors.

#!/usr/bin/perl

use strict;
use warnings;

use CGI;
use CGI::Carp qw(fatalsToBrowser);
use GD;
use Scalar::Util::Numeric qw(isnum isint isfloat);


my $cgi = new CGI;
my %standort;
my @standorte;
        my @Feldnamen = $cgi->param();
print $cgi->header(),
      $cgi->start_html('CGI-Feedback'),
      $cgi->h1('CGI-Feedback vom Programm ',$cgi->i('zeichnen.cgi'));
      foreach my $Feld (@Feldnamen) {
              push (@standorte,{$Feld =>$cgi->param($Feld)});
      }
foreach my  $hash  (@standorte) {
        my $hash_value =   $hash{standort_1};
                if ( $key  =~ /stand/i )  {
                print "<br>";
                print keys %$hash;
                print "  ---  ";
                print values %$hash;
                }
        }
}