On Thu, 25 Nov 2004, Михаил Монашёв wrote:
> Написал простейший скрипт:
>
> #!/usr/local/bin/perl -w
>
> use strict;
>
> use Apache::Request();
> use Apache::Constants qw(OK REDIRECT);
>
> my $r=Apache->request();
>
> use Apache::Constants qw(REDIRECT OK);
> $r->headers_out->set(Location => 'http://ya.ru/');
> $r->status(REDIRECT);
> $r->send_http_header;
> return OK;
А если убрать $r->send_http_header; ?
Игорь Сысоев
http://sysoev.ru