Help for this page

Select Code to Download

Select or download this

 my $req = Apache2::Request->new($request->{r});
 my $j = Apache2::Cookie::Jar->new($req);
 my @attESSec = $j->cookies();

Select or download this

sub GET {
    my ($self, $request, $response) = @_ ;
    my $c = $request->connection;
    my $cookies = $request->headers_in->{Cookie};
    my %cookies = map { split(/=/) } split(/;/,$cookies);