информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
Атака на InternetСетевые кракеры и правда о деле Левина
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Три миллиона электронных замков... 
 Doom на газонокосилках 
 Умер Никлаус Вирт 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / web building
Имя Пароль
ФОРУМ
если вы видите этот текст, отключите в настройках форума использование JavaScript
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
  • Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
  • Новичкам также крайне полезно ознакомиться с данным документом.
code 13.11.04 11:31  Число просмотров: 3185
Автор: Heller <Heller> Статус: Elderman
<"чистая" ссылка>
#!/usr/bin/perl
use CGI qw/:standart/;
$name=new CGI;
$name=$name->param('xxx');
#Вместо xxx поставь имя текстового поля
$name =~/[<>\|\-&\.\\\/\0]/g;
open (FH,"temp/$name.htm") or open (FH,"error.htm");
print "Content-type: text/html\n\n";
while (<FH>) {print}
close FH;

А вообще очень рекомендую выкачать откуда-нибудь пакет cgi-lib.pl - а то этот CGI.pm как-то не всегда корректно срабатывает.

С cgi-lib.pl строчки 2-4 надо будет заменить на следующее:

require 'cgi-lib.pl';
&ReadParse(*in);
$name=$in{'xxx'};
<web building>
не могу сделать обработку формы на perl'e ... помогите кто силен, plz 13.11.04 05:29  
Автор: name01 Статус: Незарегистрированный пользователь
<"чистая" ссылка>
Здравствуйте, проблема в следующем -

у меня есть форма и в ней один input text и 1 button (submit)

надо надо скрипт который бы обрабатывал данную форму следующм образом - когда вводишь скажем 234 в поле, ну просто число, и нажимаешь кнопку субмит то скрипт бы искал в папке TEMP скажем файл с именем 234.html и если нашел то выдавал его, а если файла такого нет как указано в поле формы то редирект на файл error.html ... я так подозреваю что скрипт не большой а написать все равно не могу так как не программист..

если у кого что есть похожее или кто то что то знает помогите пожалуйста - ada@mail.ru, спасибо.

или здесь отпишите код или линк на похожий скрипт..
code 13.11.04 11:31  
Автор: Heller <Heller> Статус: Elderman
<"чистая" ссылка>
#!/usr/bin/perl
use CGI qw/:standart/;
$name=new CGI;
$name=$name->param('xxx');
#Вместо xxx поставь имя текстового поля
$name =~/[<>\|\-&\.\\\/\0]/g;
open (FH,"temp/$name.htm") or open (FH,"error.htm");
print "Content-type: text/html\n\n";
while (<FH>) {print}
close FH;

А вообще очень рекомендую выкачать откуда-нибудь пакет cgi-lib.pl - а то этот CGI.pm как-то не всегда корректно срабатывает.

С cgi-lib.pl строчки 2-4 надо будет заменить на следующее:

require 'cgi-lib.pl';
&ReadParse(*in);
$name=$in{'xxx'};
1




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


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