Markus P.: Wie kann ich das CGI Modul beim dekodieren einsetzen ?

Beitrag lesen

Hallo ,
Ich will ein Gästebuch machen und bis jetzt klappt alles wunderbar, nur hab ich irgendwie Probleme die Daten dekodiert auf das Flat File zu speichern .Ich weis zwar das es irgendwie mit $inhalt = &query->param('inhalt'); gehen muss, aber ich weis nicht wie ich das hier kombinieren kann. Ich kenn zwar Beispiele die param() verwenden um die übergebenen Daten einzulesen, aber das verwirrt mich irgendwie, weil ich die Daten doch aus QUERY_STRING lesen muss. Hier nun das Script bis jetzt.
#!/usr/bin/perl -w

use CGI qw(:standard);

$data = "data.txt";

$inhalt = $ENV{'QUERY_STRING'};

print header();
print "<html><head><title>save</title></head>\n";
print "<body bgcolor="#5F5F5F" text="white" link="white" vlink="white">\n";
open(DATA,">>$data") or die "Can't save data: $!\n";
flock DATA, 2;
print DATA "$inhalt \n";
close DATA;
print "<p>Files saved</p>\n";
print "<a href="mainboard.pl">BACK TO MAIN SITE</a>";
print "</body></html>\n";

Danke im Voraus..