Hallo, ich hab ein HTML Formular ertstellt, dass die Eingaben eines Users ausliest und dann per perlscript in einer Datei speichert. Wie kann ich es schaffen, dass diese Datei beim nächsten eingeben eines Users nicht überschrieben wird, sondern eine neue angelegt wird. Wenn zum Beispiel die erste msg1.mes heißt, dass dann wenn diese bereits existiert eine weitere names msg2.mes angelegt wird, wenn ein neuer User in das html Formulat etwas eingibt.
Danke
o-html formular-o
<html>
<body bgcolor="#ffffff" text="000000">
<center><h1>Eingabeformular</h1></center>
<form action="http://localhost/cgi-bin/forum.pl" method="post">
New message:<br>
<textarea cols="60" rows="10" name="message"></textarea><br>
<input type="submit" value="send">
<input type="reset" value="reset">
</body>
</html>
o-perl scripts-o
#! c:/perl/bin/perl.exe
use CGI;
$c = new CGI;
$text = $c->param('message');
$text =~ s/\n/<br>/g;
open (DATEI, ">>/perltest/msg1.mes") || die "Fehler beim Öffnen";
print DATEI "$text";
close (DATEI);
#hier müsste glaube ich noch irgendwas mit einer while schleife hin für das auslesen der ganzen msg.mes Dateien, aber wie gehts?
open(Datei,"/perltest/messages.html") || die "konnte Datei nicht öffnen";#in dieser Datei sollen dann alle Posts ausgegeben werden (von msg1.mes...msg2.mes.....usw.)
my @content = <Datei>;
close(Datei);
print "Content-type: text/html\n\n";
print "@content";
DANKE
Datum: 04.12.2004-11:38
html Formular - (speichern von fortlaufenden Dateinamen)
