sslug-teknik team mailing list archive
-
sslug-teknik team
-
Mailing list archive
-
Message #45023
Re: Perl script og web formular
Martin Andersen wrote:
> Er der nogen der har et forslag til rettelse i perl-scriptet
Gå fat i en Perl bog!
Slet følgende:
> print qq(
> <h1>Form Response</h1>
>
> <p>The following information is being forwarded by email:
>
> <p>
> Remote Host: <tt>$ENV{"REMOTE_HOST"}</tt><br>
> Remote Addr: <tt>$ENV{"REMOTE_ADDR"}</tt><br>
> User Agent: <tt>$ENV{"HTTP_USER_AGENT"}</tt><br>
>
> <p>
> <strong>Form Responses:</strong>
> <p>\n);
>
> foreach $name (keys(%qs))
> { print "$name: <tt>$qs{$name}</tt><br>\n"; }
og erstat det med
print "Goodbye and thanks for all the fish!";
Herfra sendes der post.
--
Mvh. Carsten Svaneborg
References