my $r = Apache2::RequestUtil->request; my $req = Apache2::Request->new($r);