VPF::redirect - Форум программистов

Grig

Дата 26.7.2006, 17:43 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 809
Регистрация: 29.4.2005
Где: Иркутск

Репутация: нет
Всего: 16

Я пользовался поиском и знаю, что редирект на другую страничку можно осуществить двумя способами:

Код


use CGI;  
$html=new CGI;
print $html->redirect("http://www.yandex.ru");

Код


print "Location: http://yandex.ru\n\n";

Но у меня такая ситуация, что скрипт работает, в нем есть заголовок, а отработав, я хочу, чтобы он перенаправился на другую страницу.
Возможна ли такая конструкция??:

Код


#!/usr/bin/perl
use strict;
use CGI;
print qq(Content-type: text/html\n\n);
print "<html>\n";
print "  <head><title>cgi</title></head>\n";
print "  <body>\n";
print "    <b>gfhf</b>\n";
print "  </body>\n";
print "</html>\n";
$html=new CGI;
print $html->redirect("http://www.yandex.ru");
exit 0;

Или что-нибудь подобное....
Я фигею, блин!! smile

Помогите, пожалуйста..

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

Код


print "<a href.....";

можно как-нибудь сымитировать клик на этой ссылке?

Это сообщение отредактировал(а) Grig - 26.7.2006, 18:00

--------------------

Nab

Дата 26.7.2006, 18:30 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 582
Регистрация: 25.3.2006
Где: Kiev

Репутация: 8
Всего: 37

Средствами серверного скрипта нет, средствами JavaScript да возможно, но соответственно не универсально...

Можно еще сделать refresh=1, ну и отдавать то страницу, то редирект, отслеживая по кукам, но опять же не универсально...

Это сообщение отредактировал(а) Nab - 26.7.2006, 18:31

--------------------

Чтобы правильно задать вопрос нужно знать больше половины ответа...
Perl Community
FREESCO in Ukraine

Grig

Дата 26.7.2006, 18:36 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 809
Регистрация: 29.4.2005
Где: Иркутск

Репутация: нет
Всего: 16

Код


print "<script language='javascript'> location.href='http://www.mail.ru' </script>";

вот и всех делов smile

--------------------

Nab

Дата 26.7.2006, 19:54 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 582
Регистрация: 25.3.2006
Где: Kiev

Репутация: 8
Всего: 37

угу, но к примеру у меня не сработает smile

хотя конечно процент выключенного JS катострофически мал,
а вот всякие разные роботы и поисковые, и вообще, точно этого не отработают...

--------------------

Чтобы правильно задать вопрос нужно знать больше половины ответа...
Perl Community
FREESCO in Ukraine

ochnev

Дата 30.7.2006, 19:10 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 253
Регистрация: 27.3.2006

Репутация: нет
Всего: нет

Цитата(Nab @ 26.7.2006, 19:54)

а вот всякие разные роботы и поисковые, и вообще, точно этого не отработают...

А поисковые это ещё и примут за дорвей. :-)

djkostya

Дата 30.7.2006, 21:19 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 71
Регистрация: 16.5.2006
Где: Москва

Репутация: 1
Всего: 2

Цитата(Nab @ 26.7.2006, 19:54)

а вот всякие разные роботы и поисковые, и вообще, точно этого не отработают...

А если отдавать заголовок о премещении страницы поисковому роботу ?

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: разработка для Web \| Следующая тема »