You may have a typo in the code provided. Also, you should probably start
using mod_perl methods rather than perl built-in functions.
> In a PerlAccessHandler I have code similar to the following:
>
> sub handler
> {
> my $r = shift;
> my ($cgi, $cookie);
>
> use CGI;
> $cgi =
In a PerlAccessHandler I have code similar to the following:
sub handler
{
my $r = shift;
my ($cgi, $cookie);
use CGI;
$cgi = new CGI;
$cookie = $cgi->cookie(-name => 'test');
# For debugging only
open(TEST, ">>/tmp/accesstest");
flock(TEST,2);
print TEST "co