hallo leute,
ich habe ein newsscrip geschrieben und mein problem ist jetzt folgendes:
wenn ich ein formular ausfülle (titel, text), ich schreibe im textfeld irgendetwas hin und drücke enter....schreibe wieder etwas drücke enter...usw. Wenn ich den text nur mit leertaste trennen dann schreib er in meine datei ganz normal in eine ZEILE, aber wenn ich enter drücke dann setzt er den jeweiligen text runter z.b.
-------------------------------------
bin der [enter]
hans und lebe in [enter]
Köln
-------------------------------------
das muss aber so aussehen:
-------------------------------------
bin der<br>hans und lebe in<br>Köln.
-------------------------------------
und so sieht meine Add prozedur aus:
-------------------------------------
sub add
{
if ($status eq 'done')
{
✓
if ($time > 0)
{
($Second,$Minute,$Hour,$Month_Day,
$Month,$Year,$Week_Day,$IsDST) = (localtime)[0,1,2,3,4,5,6,8];
if ($Year > 99)
{
$Year = $Year - 100;
if ($Year > 9)
{
$Year = "20$Year";
}
else
{
$Year = "200$Year";
}
}
else
{
$Year = "19$Year";
}
if ($time = 1)
{
$date="$Month_Day.$Months[$Month].$Year";
}
elsif ($time = 2)
{
$date="$Hour:$Minute:$Second $Months[$Month], $Month_Day $Year - ";
}
}
$line = $title."|".$date."|".$text."\n";
open(DATA,"<$data") || print "Cannot open datafile for reading";
while ($riga = <DATA>)
{
push (@news,$riga);
}
close(DATA);
@reversenews = reverse @news;
push (@reversenews, $line);
@news = reverse @reversenews;
$param{'text'} = ~ s/\n/<br>/g;
open(DATA,">$data") || print "Cannot open datafile for writing";
$i = 0;
while ($i < $display)
{
if ($i == ($display -1))
{
chomp $news[$i];
}
print DATA $news[$i];
$i += 1;
}
close(DATA);
print "Content-type: text/html\n\n";
print "$head\n";
print "<table align=center border=0>\n";
print "<tr><td align=center><font face=arial><b>News Added</b></font></td></tr>\n";
print "<tr><td height=10></td></tr>\n";
print "<tr><td><font face=arial>Database updated. Go <a href=$script>back to the menu</a>.</font></td></tr>\n";
print "</table>\n";
print "$foot\n";
}
else
{
✓
print "Content-type: text/html\n\n";
print "$head\n";
print "<table align=center border=0>\n";
print "<form action=$script method=post>\n";
print "<input type=hidden value=add name=action>\n";
print "<input type=hidden value=done name=status>\n";
print "<input type=hidden value=$password name=password>\n";
print "<tr><td align=center><font face=arial><b>Add a news:</b></font></td></tr>\n";
print "<tr><td height=10></td></tr>\n";
print "<tr><td><font face=arial>Titel:</font><br><input type=text name=title size=30></td></tr>\n";
print "<tr><td height=10></td></tr>\n";
print "<tr><td><font face=arial>Nachricht:</font><br><textarea name=text cols=30 rows=10 wrap=virtual></textarea></td></tr>\n";
print "<tr><td height=10></td></tr>\n";
print "<tr><td align=center><input type=submit value=Submit></td></tr>\n";
print "</form></table>\n";
print "$foot\n";
}
}
-------------------------------------
Ich hoffe ihr versteht mein Problem und könnt mir weiterhelfen...
Dank im Vorraus
Borni2k
P.S: habe diesen Beitrag gefunden:
http://www.teamone.de/selfhtml/sfarchiv/1999_2/t03196.htm
aber leider konnte er mir nicht helfen. Vielleicht könnt ihr das ???