|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Michael B. Babakov 2:5020/400 29 Dec 2000 09:31:56
To : All
Subject : Moderatorial [*] Re: Прабла у меня или торможение
--------------------------------------------------------------------------------
Offtopic. В RU.CGI.PERL.
Sergej Babynin wrote:
>
> Hi о великий ALL!!!
> Тут прабла появилась я начинающий в ПЕРЛЕ и учу его на чужих примерах.
> Так вот есть у меня CGI файл.
> Hапример:
> В этом файле проверяется какая ссылка от HTML например <a
> href="/cgi-bin/cgi.cgi?reg">
>
> #Это "cgi.cgi"
> #!/usr/bin/perl
> if($ENV{'REQUEST_METHOD'} eq 'GET'){
> $query=$ENV{'QUERY_STRING'};
> }
> elsif($ENV{'REQUEST_METHOD'} eq 'POST'){
> sysread(STDIN,$query,$ENV{'CONTENT_LENGTH'});
>
> #Eсли Reg значит идти сюда:
>
> if ($query eq "reg"){ do "reg.cgi";
> ®:
> exit;
> }
>
> А в reg.cgi находится форма например регистрации.
> #Hапример это reg.cgi
> #!/usr/bin/perl
> sub reg{
> print <<HTML;
> <html>
> <head>
> <form method="POST" action="/cgi-bin/cgi.cgi"> #Здесь вроде так, а дальше?
> <p><input type="text" name="T1" size="20"><input type="submit"
> value="Submit" name="B1"></p>
> </form>
> </body>
> </html>
> HTML
> }
> ну я думаю понятно?
> Теперь вопрос как сделать так чтобы он пользовался определением метода из
> файла cgi.cgi ?
--
С уважением,
Михаил Бабаков
--------------------------------
Телефон: (8622) 919-595
e-mail: M.Babakov@sochi.net.ru
ICQ: 16442739
--- ifmail v.2.15dev5
* Origin: Technology Communication Centre, Sochi (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
| Тема: |
Автор: |
Дата: |
|
Прабла у меня или торможение |
Sergej Babynin |
29 Dec 2000 01:34:50 |
 Moderatorial [*] Re: Прабла у меня или торможение |
Michael B. Babakov |
29 Dec 2000 09:31:56 |
|
|
