Hallo...
Ich habe folgendes Problem:
Ich habe ein HTML- Formular, welches bestimmte Textfelder besitzt. Bei diesen möchte ich den Inhalt auslesen. Ich möchte aber jedes seperat ansprechen können. z.B. möchte ich das 2. Textfeld zuerst in die Datei printen, dann das erste, fünfte usw.
Wie kann ich das lösen- indem ich sagen kann $Textfeld1 ist der Inhalt des ersten Textfeldes oder $Textfeld2 ist der Inhalt des zweiten Textfeldes usw. was ich denn leicht in einer oder verschiedenen Dateien schreiben kann:
print datei "$Textfeld1";
print datei "$Textfeld2";
usw.
Zur Hilfe:
Hier mein HTML- Code
<html>
<head>
<title>Kommentarseite</title>
</head>
<body>
<h1>Ihr Kommentar</h1>
<form action="auswertung.pl" method=post>
Name: <input size=40 maxlength=40 name1="AnwenderName"><br>
Text: <textarea rows=5 cols=70 name="Kommentartext" wrap=virtual></textarea><p>
<input type=submit value="Absenden">
</form>
</body>
</html>
Hier mein PERL- Code:
read(STDIN, $Daten, $ENV{'CONTENT_LENGTH'});
@Formularfelder = split(/&/, $Daten);
open(datei,">> c:\datei.txt");
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;
$Formular{$name} = $name;
$Formular{$value} = $value;
print datei $value; #Hier bekomme ich immer nur das letzteTextfeld
#in der Datei geschrieben, und außerdem kann ich
#die Textfelder nicht seperat ansprechen!!!
}
close (datei);




Zitieren
Lesezeichen