subi: Umsetzung eines Konsolenskripts: Hilfeeee!

Beitrag lesen

Hallo Skeeve,

den ersten Schritt habe ich jetzt gemacht. Es müssen aber weitere noch folgen. Ich habe immer noch Probleme:

Hier ist das HTML-Formular:

----------------
<form action="/cgi-bin/umrechner.pl" method="post">
  <p>Geben Sie bitte den umzurechnenden Betrag ein:</p>
  <p>
    <input name="betrag" type="text" id="betrag">
</p>
  <p>W&auml;hlen Sie bitte eine Option aus:</p>
  <p>
    <input type="radio" name="button1" value="radiobutton">
  DM zu EUR</p>
  <p>
     <input type="radio" name="button2" value="radiobutton">
     EUR zu DM</p>
  <p>
    <input type="submit" name="Submit" value="Umrechnen">
  </p>
</form>
----------------

calculator.pl
---------------

#!usr/bin/perl
read(STDIN, my $Daten, $ENV{'CONTENT_LENGTH'});
my @Formularfelder = split(/&/, $Daten);
my ($Feld, $Name, $Wert);
my %Formular;
foreach $Feld (@Formularfelder) {
 (my $Name, $Wert) = split(/=/, $Feld);
$betrag =~ tr/,/./;
$EUR = $betrag/1.95583;
$DM = $betrag*1.95583;
$auswahl;
  if($auswahl == $Formular{button1}) {
    print "<p>$EUR</p>\n";
  }
  elsif ($auswahl == $Formular{button2}) {
   print "<p>$DM</p>\n";
  }
  else {
  print "<p>Die Option $auswahl existiert nicht!</p>\n";
  }
--------

Was mache ich hier falsch? Es kommt immer eine Fehlermeldung!