I try this simple module: ---------------------------------------------------------------------------- #!/usr/bin/perl package My; use strict; use warnings; use Apache::RequestRec (); use Apache::RequestIO (); use Apache::RequestUtil (); use Apache::Const -compile => qw(OK); use APR::Table; use CGI;
sub handler { my $r = shift; my $query=CGI->new(); print $query->param('id'); } -------------------------------------------------------------------------- and see that in error.log: [Tue Jan 14 13:59:08 2003] [error] Can't locate Apache.pm in @INC (@INC contains: /usr/local/apache2 /usr/local/lib/perl5/site_perl/5.8.0/i586-linux/Apache2 /usr/local/lib/perl5/5.8.0/i586-linux /usr/local/lib/perl5/5.8.0 /usr/local/lib/perl5/site_perl/5.8.0/i586-linux /usr/local/lib/perl5/site_perl/5.8.0 /usr/local/lib/perl5/site_perl .) at /usr/local/lib/perl5/5.8.0/CGI.pm line 161. What I'm doing wrong? How to parse urlecnoded?