Здравствуйте Михаил,
Написал простейший скрипт:
#!/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 => '');
$r->status(REDIRECT);
$r->send_http_header;
return OK;
Он мне почему-то выдаёт:
HTTP/1.1 302 Found
Date: Thu, 25 Nov 2004 08:02:57 GMT
Server: Apache
Location:
Connection: close
Transfer-Encoding: chunked
Content-Type: text/html
181
HTTP/1.1 302 Found
Date: Thu, 25 Nov 2004 08:02:57 GMT
Server: Apache
Location:
Connection: close
Transfer-Encoding: chunked
Content-Type: text/html; charset=iso-8859-1
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
<HTML><HEAD>
<TITLE>302 Found</TITLE>
</HEAD><BODY>
<H1>Found</H1>
The document has moved <A HREF=";>here</A>.<P>
</BODY></HTML>
0
Почему в теле ответа дублируется заголовок?
С уважением,
Михаил Монашёв, SoftSearch.ru
Member of Independent Software Developers Forum (ISDEF)
mailto:postmaster@xxxxxxxxxxxxx
ICQ# 166233339
Без бэкапа по жизни.
