On Thu, 2003-07-31 at 15:44, Mark Deepak Puttnam wrote:
sub handler { my $r=shift; my $env=$r->subprocess_env; %ENV=%$senv;
my $referer=$ENV{'HTTP_REFERER'}; xxxx
xxxxx
}
Come to think of it, you should just use the Apache API for this:
my $referer = $r->header_in("Referer");
BTW, header_in, header_out and err_header_out are sort of "deprecated", since mp1 and mp2 both have headers_in, headers_out and err_headers_out. so if you write your mp1 code using the latter ones, it'll be easier to move to mp2.
__________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
