Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: разработка для Web > Referer's URL

Автор: Ivan The Terrible 16.8.2004, 19:38

Как получить URL, при помощи которого произошел переход на страницу?
Пробовал $ref=$ENV{'HTTP_REFERER'}. Не получается.

Автор: korob2001 17.8.2004, 02:46

Попробуй скопировать такой HTML файл:

Код


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Тест</title>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
</head>

<body>
 <a href="/cgi-bin/test.pl">Тест</a>
</body>
</html>

Назови его как пожелаешь, лишь бы расширение было .html или .htm . Сохрани его в каталог с html файлами твоего сервера.

Теперь скопируй этот код:

Код


#!/usr/bin/perl -w
print "Content-type: text/html\n\n";
print $ENV{ HTTP_REFERER };

Сохрани его под именем test.pl в каталог /cgi-bin. Теперь в адресной строке браузера введи адрес нашей HTML странички. Нажми на ссылку. Вот и всё, в результате ты увидешь что-то типа:
http://localhost/test.htm

Если и этот вариант работать не будет, тогда опиши подробнее все что ты делаешь и какую ошибку выдаёт Perl.

Удачи.

Автор: Гость_Ivan The Terrible 17.8.2004, 20:44

Спасибо!
Все заработало.