информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
За кого нас держат?Spanning Tree Protocol: недокументированное применениеПортрет посетителя
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Бэкдор в xz/liblzma, предназначенный... 
 Три миллиона электронных замков... 
 Doom на газонокосилках 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
ФОРУМ
если вы видите этот текст, отключите в настройках форума использование JavaScript
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
  • Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
  • Новичкам также крайне полезно ознакомиться с данным документом.
[Perl] как открыть в брауезре страницу 29.07.03 20:50  
Автор: loki Статус: Незарегистрированный пользователь
<"чистая" ссылка> <обсуждение закрыто>
Как открыть в IE страницу с помощью cgi-скрипта на perl выполненного в этом же браузере?
Заранее благодарю за ответ!
[Perl] может я неправильно понял вопрос... 30.07.03 18:02  
Автор: Eugene Статус: Незарегистрированный пользователь
<"чистая" ссылка> <обсуждение закрыто>
тут народ съехал к теме редиректа...

для перенаправления на какую-либо страницу можно сделать так:

#!/usr/bin/perl

use strict;
use CGI;

my $query = CGI->new();

print $query->redirect( -uri => 'http://url' );

1;

или просто

print "Status: 302 Moved\nLocation: http://url\n\n";

первый вариант, безусловно, грамотней

как сделать без cgi? ну решение с mod_perl это, конечно же, глупость [на практике]. не для этих целей он предназначен. с таким же успехом можно и сырцы апача переписать. Потому выхода 2:
или mod_rewrite [предпочтительно]
или meta content refresh и тп
[Perl] ну например 30.07.03 10:42  
Автор: Ktirf <Æ Rusakov> Статус: Elderman
<"чистая" ссылка> <обсуждение закрыто>
Сгенерировать HTML код с тегом meta refresh=0 и направлением туда, куда тебе нужно :)
А вообще-то смотри возможности Апача по редиректу.
[Perl] ну например 30.07.03 17:06  
Автор: loki Статус: Незарегистрированный пользователь
<"чистая" ссылка> <обсуждение закрыто>
> Сгенерировать HTML код с тегом meta refresh=0 и
> направлением туда, куда тебе нужно :)
> А вообще-то смотри возможности Апача по редиректу.
А нельзя ли подробнее и с примерами, если можно? И ещё, реально ли это сделать без cgi?
[Perl] 30.07.03 17:46  
Автор: Ktirf <Æ Rusakov> Статус: Elderman
Отредактировано 30.07.03 17:48  Количество правок: 1
<"чистая" ссылка> <обсуждение закрыто>
> > Сгенерировать HTML код с тегом meta refresh=0 и
> > направлением туда, куда тебе нужно :)
> > А вообще-то смотри возможности Апача по редиректу.
> А нельзя ли подробнее и с примерами, если можно?
Честно говоря, я просто знаю, что это можно сделать, потому что однажды делал это сам. Как именно - не помню, к тому же зависит от ситуации. RTFM.

Ну или хотя бы немного больше расскажи о том, что и в каких условиях нужно сделать.

> И ещё, реально ли это сделать без cgi?
Реально. Существует такая вещь как mod_perl.
[Perl] 30.07.03 18:30  
Автор: loki Статус: Незарегистрированный пользователь
<"чистая" ссылка> <обсуждение закрыто>
> Ну или хотя бы немного больше расскажи о том, что и в каких
> условиях нужно сделать.
Запросто. Запускаю скрипт на сервере и передаю ему имя html-файла лежащего с ним в одной директории. Этот файл он должн открыть в IE. Желательно в том же окошке, из которого был запущен.
[Perl] ответ 30.07.03 18:40  
Автор: Eugene Статус: Незарегистрированный пользователь
<"чистая" ссылка> <обсуждение закрыто>
#!/usr/bin/perl

use strict;
use HTML::Template;
use CGI;

my $query = new CGI();

my $filename = $query->param("file");

my $template = HTML::Template->new(filename => $filename);

print $template -> output;
[Perl] Спасибо 30.07.03 19:31  
Автор: loki Статус: Незарегистрированный пользователь
<"чистая" ссылка> <обсуждение закрыто>
Eugene, big thanks тебе!
Я ещё не проверял, но, думаю, это именно то, что мне нужно!
Тебя, Ktirf, также благодарю за помощь!
Думаю, что тему можно считать закрытой!
[Perl] Тогда закрой ее, когда решишь :) 30.07.03 19:44  
Автор: Ktirf <Æ Rusakov> Статус: Elderman
<"чистая" ссылка> <обсуждение закрыто>
> Тебя, Ktirf, также благодарю за помощь!
Не за что, сорри за недружелюбие :)

> Думаю, что тему можно считать закрытой!
На верхнем посте щелкни кнопочку "закрыть", когда соберешься :)
1




Rambler's Top100
Рейтинг@Mail.ru


  Copyright © 2001-2024 Dmitry Leonov   Page build time: 0 s   Design: Vadim Derkach