Hallo Klaus,
Hurrah, es hat geklappt :)))))
Meine Daten aus dem Formular werden nun in mein Textfile geschrieben.
Mein Code dazu sieht so aus:
#!/perl/cgi-bin/perl -w
use CGI qw(:standard);
use CGI::Carp qw(fatalsToBrowser);
if($ENV{'REQUEST_METHOD'} eq 'GET'){
$Daten = $ENV{'QUERY_STRING'}
}
else{
read(STDIN, $Daten, $ENV{'CONTENT_LENGTH'});
}
@Formularfelder = split(/&/, $Daten);
my @NeueZeilen;
foreach(@Formularfelder) {
$_ =~ s/#.*//;
push(@NeueZeilen,$_) if $_ !~ /^\s*\n/;
}
open(DATEI, ">>test/test.txt") || die "Datei nicht gefunden";
print DATEI @NeueZeilen;
close(DATEI);
Nun muss ich das Ganze noch sinnvoll formatieren.
Vielen lieben Dank für deinen Tipp.
Greetz, Dani