> > #!/usr/bin/perl
> >
> > read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
> > @pairs = split(/&/, $buffer);
> > foreach $pair (@pairs)
> > {
> > ($name, $value) = split(/=/, $pair);
> > $value =~ tr/+/ /;
> > ^
> > $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
On Wed, 1 Oct 2003, Charles Howse wrote:
> Hi,
> I'm *copying an example* perl cgi script from "FreeBSD Unleashed" pp.
> 699. I have 2 issues.
>
> 1. The redirect on the last line isn't working. It opens a blank page
> and prints the text "Location: http://howse.no-ip.org/thanks.shtml";.
> That'
> Hi,
> I'm *copying an example* perl cgi script from "FreeBSD Unleashed" pp.
> 699.
> I have 2 issues.
>
> 1. The redirect on the last line isn't working. It opens a blank page
> and prints the text "Location: http://howse.no-ip.org/thanks.shtml";.
> That's not what I want. I want to open the p
Hi,
I'm *copying an example* perl cgi script from "FreeBSD Unleashed" pp.
699.
I have 2 issues.
1. The redirect on the last line isn't working. It opens a blank page
and prints the text "Location: http://howse.no-ip.org/thanks.shtml";.
That's not what I want. I want to open the page thanks.shtml