HURTIGT!!! - METHOD=post

Jeg gør det sådan:

read(STDIN, $input,$ENV{\'CONTENT_LENGTH\'});

@allepar = split(/&/, $input);
foreach $par (@allepar) {
    ($navn, $vaerdi) = split(/=/, $par);
    $navn =~ tr/+/ /;
    $navn =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack(\"C\", hex($1))/eg;
    $vaerdi =~ tr/+/ /;
    $vaerdi =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack(\"C\", hex($1))/eg;
IND
    $IND{$navn} = $vaerdi;
  }


Så får du dit brugernavn ved at skrive $IND{\'brugernavn\'}

Jeg kan ikke få det til at virke på nogen måde!!!
Det skal da stå på den side som skal vise brugernavn og password ik?