Forum Webscript.Ru

Программирование => Perl => Тема начата: maxirom от 21 Августа 2003, 10:58:14

Название: print "Location: $url\\n\\n";
Отправлено: maxirom от 21 Августа 2003, 10:58:14

наверняка задам глупый вопрос, но все равно

$url = "http://www.mi.com/test.pl?one=1&two=2";
print "Location: $url\\n\\n";

такие строки кода предлагают при запуске к.л. скрипта на другом сервере с параметрами

как же это может работать если мы просто получаем на выходе строку текста:

Location: http://www.mi.com/test.pl?one=1&two=2

и больше НИЧЕГО. от этого то ничего не запустится.

Название: print "Location: $url\\n\\n";
Отправлено: NeoNox от 21 Августа 2003, 11:26:38

Ты можешь задавать более четко вопросы?
Я ничего из этого не понял.
На всякий случай почитай о заголовках HTTP/1.1
http://www.w3.org/Protocols/rfc2616/rfc2616-sec14.html

Название: print "Location: $url\\n\\n";
Отправлено: maxirom от 21 Августа 2003, 11:33:45

спасибо НеоНокс, понял что такое location

только вот еще:

А как составлять эти заголовки HTTP на Перл

Название: print "Location: $url\\n\\n";
Отправлено: NeoNox от 21 Августа 2003, 11:50:30

Либо либо Location либо используя CGI.pm
http://search.cpan.org/src/LDS/CGI.pm-2.93/cgi_docs.html#header

Название: print "Location: $url\\n\\n";
Отправлено: maxirom от 21 Августа 2003, 12:14:21

т.е если нужно создать пустой заголовок HTTP (для запуска скрипта по урлу) необходимо написать:

Content-type: text/html
Location: http://www.script.pl?a=aaa&b=bbbb

Название: print "Location: $url\\n\\n";
Отправлено: metton от 22 Августа 2003, 00:02:22

2maxirom

Код: [Выделить]


print "Content-Type: text/html\\r\\n";
print "Location: [url]www.script.pl?a=aaa&b=bbbb[/url]\\r\\n\\r\\n";


Можно и без первой строки. Главное, чтобы заголовок заканчивался на два CRLF (\\r\\n).

Название: print "Location: $url\\n\\n";
Отправлено: GameKeeper от 13 Января 2006, 20:03:43

NeoNox
 
у меня непонятка с print "Location: пробовал и так и сяк. Может в среде KF Web Server этот заголовок вообще не работает?
Буду благодарен, если поможешь.

ICQ: 77063155

Название: print "Location: $url\\n\\n";
Отправлено: NeoNox от 14 Января 2006, 00:10:05

Фигасе, три года сообщению.
Может и не работает, access_log и error_log у KF Web Server есть?
Если есть - смотри в них что происходит при переадресации.

Название: print "Location: $url\\n\\n";
Отправлено: GameKeeper от 14 Января 2006, 11:07:13

NeoNox
да вообщето решил проблему иначе:
$bad_referer_img = "7.gif";
 open (IMGOU, "<$bad_referer_img");
      binmode(IMGOU);
      while ($cb = read(IMGOU,$data,1024)) {
        $binimage .= $data;
      }
      close(IMGOU);
      print "Content-type: image/gif\\n\\n";
      binmode(STDOUT);
      print $binimage;
логов, про которые ты говоришь нету у этого сервера, я посмотрел...
терь вот другая проблема...
как 2 гифа в один превратить перлом?
сайт ссылается на один гиф, а мне нужно несколько гифов ему передать сложивши в один. Ну короче говоря счётчик посещения сайта графический ваяю.
Спосибо за отклик.

Название: print "Location: $url\\n\\n";
Отправлено: Nudlok от 26 Января 2006, 14:27:33

print redirect( -url => "http://yandex.ru/yandsearch?text=$zapros&stype=www");

у меня вот так всё работает(передача параметров другому скрипту) , если вы это имеете ввиду