Dani: Daten abspeichern

Beitrag lesen

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