On Sat, 2 Oct 1999, David Harris wrote:
>
> Dirk Lutzebaeck wrote:
> > ie.
> >
> >
> > Options ExecCGI
> > SetHandler perl-script
> > PerlHandler Apache::OutputChain Apache::GzipChain Apache::Registry
> >
> >
> > and /PERL/x.pl
> >
> > use Apache;
> > use Apache::Constants qw(REDIRECT);
> > $r
> From: Dirk Lutzebaeck [mailto:[EMAIL PROTECTED]]
>
> Gerald suggested to track down where the header gets lost. Here is
> what I found out.
>
> The chain is very simple:
>
> SetHandler perl-script
> Options ExecCGI
> PerlHandler Apache::OutputChain Apache::EmbperlChain Apache::PassFile
>
>[...]
next point release of embperl.
cliff rayman
genwax.com
Dirk Lutzebaeck wrote:
> Cliff Rayman writes:
>
> > the exit is broken in some contexts.
> > if this is part of a subroutine or called from an execute that may be the
> > problem.
>
> Hmm, in my case there is no execute for sub envolved
David Harris writes:
> Can I really just do a "Location: /auth/" and have it work?
>
> - David Harris
>Principal Engineer, DRH Internet Services
Works for me, ie. Netscape 4.6
Dirk
Dirk Lutzebaeck wrote:
> ie.
>
>
> Options ExecCGI
> SetHandler perl-script
> PerlHandler Apache::OutputChain Apache::GzipChain Apache::Registry
>
>
> and /PERL/x.pl
>
> use Apache;
> use Apache::Constants qw(REDIRECT);
> $r = Apache->request;
> $r->header_out("Location" => "/y.html");
> $r->st
Gerald Richter writes:
>
> If you try
>
> [-
> use Apache::Constants qw(REDIRECT);
> $req_rec->header_out("Location" => "/y.html");
> $req_rec->status(REDIRECT);
> -]
>
> and nothing else in the file, does this work or not?
No, not with chaining enabled. Without chaining it works
If you try
[-
use Apache::Constants qw(REDIRECT);
$req_rec->header_out("Location" => "/y.html");
$req_rec->status(REDIRECT);
-]
and nothing else in the file, does this work or not?
Gerald
BTW. The location should be a full URL including the host part
Cliff Rayman writes:
> the exit is broken in some contexts.
> if this is part of a subroutine or called from an execute that may be the
> problem.
Hmm, in my case there is no execute for sub envolved. I'm using
[-
use Apache;
use Apache::Constants qw(REDIRECT);
$r = Apache->request;
Gerald Richter writes:
> >
> > Requesting y.html returns just '1 2', no redirection is taking place.
> >
> > I have also tried $r->internal_redirect and
> > $r->internal_redirect_handler also in combination with Apache::exit()
> > all with the same result.
> >
> > It works when setting Per
>
> Requesting y.html returns just '1 2', no redirection is taking place.
>
> I have also tried $r->internal_redirect and
> $r->internal_redirect_handler also in combination with Apache::exit()
> all with the same result.
>
> It works when setting PerlHandler only to Apache::Embperl in the first
>
the exit is broken in some contexts.
if this is part of a subroutine or called from an execute that may be the
problem.
I am setting a global exit variable until this is fixed. i.e
GWC.htm
[$ sub mysub $]
[- unless(dothis()){
$GWC::xitflg==1;
exit
-]
[$ endsub $]
somepage.htm
[- Execu
Cliff Rayman writes:
> if you are going to redirect in embperl then you need to put an exit after
> $r->status(REDIRECT).
> just setting that variable does not cause embperl to exit. so,
>
> [-
> use Apache;
> use Apache::Constants qw(REDIRECT);
>
> $r = Apache->request;
>
>
if you are going to redirect in embperl then you need to put an exit after
$r->status(REDIRECT).
just setting that variable does not cause embperl to exit. so,
[-
use Apache;
use Apache::Constants qw(REDIRECT);
$r = Apache->request;
$r->header_out("Location" => "x.html");
$r->status(
13 matches
Mail list logo
