Hashs mit Werten belegen

[Markus Fischer]

Hallo,

bisher habe ich immer versucht Hashs zu umgehen, weil ich damit nicht zurecht gekommen bin. Jetzt aber muß ich wohl oder übel diese Form von Variablen einsetzen, da mein Script sonst zu umständlich werden würde. Das Problem:

Wie kann ich die Parameter, die dem Script übergeben werden, in ein Hash einlesen? So habe ich es zuletzt versucht:

if($ENV{'REQUEST_METHOD'} eq 'GET')
    {
     $Daten = $ENV{'QUERY_STRING'}
    }
   else
    {
     read(STDIN, $Daten, $ENV{'CONTENT_LENGTH'});
    }
   @Formularfelder = split(/&/, $Daten);
   foreach $Feld (@Formularfelder)  
    {
     ($name, $value) = split(/=/, $Feld);  
     $value =~ tr/+/ /;
     $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
     $value =~ s/<!--(.\n)*-->//g;      
     %Wert+=$name;
     %Wert+=$value;
    }

Funktioniert leider nicht. Aber warum? Wie muß die Syntax aussehen?

Danke!

AZ

Könnte evtl. eine Lösung sein:

$Wert{$name} = $value;

Ciao