nicht angemeldet
Leute, ich habe ein Problem mit dem Script für mein Gästebuch.
Der Script läuft zwar in der Consolle, aber macht dafür nichts auf der WEB-Seite. Anstatt der neuen Datei neu.html öffnet sich nach dem Absenden questbook.pl als eine Browser-Seite.
Vielleicht liege ich ja in einer ganz falscher Richtung mit diesem Script. Kann mir da jemand auf den richtigen Weg helfen.
Danke
Arthur
___________________________________________________________________
Mein Formular des Gästebuchs:
-------------------------------------------------------------------
<html>
<head>
<title>questbook</title>
</head>
<body bgcolor="black" text="yellow">
<form action="cgi-bin\guestbook.pl" name="questbook" target="_top" method="post" enctype="multipart/form-data">
<p><input type="text" name="name" value="<Name>" maxlength="20" size="20"></p>
<p><textarea name="kommentar" rows="5" cols="80"><Kommentar></textarea></p>
<p><input type="submit" name="senden" value="Absenden"></p>
</form>
</body>
</html>
____________________________________________________________________
Hier ist der Script:
--------------------------------------------------------------------
#!usr/bin/perl -w
use CGI;
use strict;
use CGI::Carp qw(fatalsToBrowser);
my $cgi = new CGI;
my @name = $cgi->param('name');
my @kommentar = $cgi->param('kommentar');
my @datei;
my @alt;
my @neu;
open(DATEI, "<neu.html");
@datei = <DATEI>;
close(DATEI);
foreach(@datei)
{push(@alt,$_)};
foreach(@name)
{push(@alt,$_)};
foreach(@kommentar)
{push(@alt,$_)};
foreach (@alt)
{if(/^<!-- NEU -->/)
{push(@neu,$_);}
push(@alt,"<!-- NEU -->\n");};
open(DATEI, "<neu.html");
$, = "<br>";
print "@neu";
close(DATEI);
--------------------------------------------------------------------