Setting 'Location' header

[Stathy Touloumis]

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;

Thanks!

Re: Setting 'Location' header

[Dave Rolsky]

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
==*/