Einfacher Formmailer, Danke-Seite als .pl, mit foreach?

[Matti Maekitalo]

use Mosche;

Dafür bräucht ich aber dann irgedwie "ZWEI Schleifen", weil ich (Wert und Feldnamen) in eine Zeile
bringen muss, oder nicht?

Nöö - du willst doch in eine Zeile die Werte reintun, und im jeden Schleifenschritt bekommst du einen neuen Feldnamen und daraus resultierend einen neuen Feldwert (mit param() ).

Eigentlich? ...ist das Problem die abwechselnde (bgcolor), die macht mir das schwierig!

Du solltest erst mal mit dem ersten Schritt anfangen und das verstehen, anstatt als Anfänger (ohne dich beleidigen zu wollen) gleich zwei Schritt auf einmal zu machen.

Ich habe dein Beispiel entsprechend korrigiert.

my @Feldnamen = $cgi->param();

print $cgi->header(),
      $cgi->start_html('CGI-Feedback');
#$cgi->h1('CGI-Feedback vom Programm ',$cgi->i('comments.pl'));
      print "<table BORDER=1 cellspacing=0>\n";

my $rc = 0;

foreach my $Feld (@Feldnamen)
      {

# Für diese Zeile passende Farbe aussuchen
   my $color;
   if ($rc) {
      $color = '#CFCFCF';
      $rc = 0;
   } else {
      $color = '#EFEFEF';
      $rc = 1;
   }
   my $Value = $cgi->param($Feld);

print <<EOF;
   <tr>
      <th bgcolor="$color">$Feld</th>
      <td bgcolor="$color">$Value</th>
   </tr>
EOF

}

print "</table>\n";

use Tschoe qw(Matti);