my $r = Apache->request;
my $query = CGI->new($r);