← Back to team overview

sslug-teknik team mailing list archive

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