On Tue, 13 Feb 2001, Stathy Touloumis wrote:
> This code does not seem to work whether in a handler or when using a Mason
> component. I have tried several variations with different versions of
> mod_perl to no avail. Can anyone shed some light?
>
> my $head = $r->headers_out;
> $head->set( Location=> '/index.html' );
> $head->set( Target=> '_top' );
> $r->send_http_header;
The Mason FAQ has a good example of how to do a redirect from a Mason
component. The same code (minus the Mason specific stuff) works fine
under mod_perl.
You're missing setting the status, which is probably the main problem.
Here's a link to the Mason FAQ:
http://www.masonhq.com/docs/faq/#How_do_I_do_an_external_redirect
-dave
/*==================
www.urth.org
We await the New Sun
==================*/
