David Arnold wrote:
> All,
>
> I am working on Recipe 3.4. I have the following saved as cgi-perl/try.pl:
>
> #! /usr/bin/perl -w
> # file: try.pl
>
> use strict;
> use Apache::Const qw(:common);
>
> my $r=shift;
>
> # Grab all of the headers at once
> my %headers_in=$r->headers_in;
>
> # o
All,
I am working on Recipe 3.4. I have the following saved as cgi-perl/try.pl:
#! /usr/bin/perl -w
# file: try.pl
use strict;
use Apache::Const qw(:common);
my $r=shift;
# Grab all of the headers at once
my %headers_in=$r->headers_in;
# or get a specific header and do something with it
my $g