Hi All!
Thanks for your suggestions.
Here is the solution:
# set the location
$r->headers_out->set( Location => $CONFIG->{ACCESS_DENIED} );
return Apache2::Const::REDIRECT;
Regards,
Younes
----Message d'origine----
>Copie à: modperl_users List <modperl@perl.apache.org>
>De: Jonathan Vanasco <[EMAIL PROTECTED]>
>Sujet: Re: Modperl2 + PerlAccessHandler + Redirect
>Date: Thu, 9 Mar 2006 19:59:31 -0500
>A: Tom Schindl <[EMAIL PROTECTED]>
>
>Tom's suggestion made me realize the obvious flaw in the code that
>neither of us saw.
>
> header_out
>
>doesn't exist in the api. headerS_out does.
>
>Try:
> $r->headers_out( Location => 'http://www.google.fr' );
>not:
> $r->header_out( Location => 'http://www.google.fr' );
>
>
>
>
>
>On Mar 9, 2006, at 6:39 PM, Tom Schindl wrote:
>
>> If that's not working I'd give err_headers_out_ a try:
>>> $r->header_out( Location => 'http://www.google.fr' );
>
>
>
>
>
