получение параметров при посылке их Get и POST методами
Релиб
Форумы       Участники    Календарь    Кто он-лайн?
Добро пожаловать, гость ( Вход | Регистрация )
        



получение параметров при посылке их Get и... Expand / Collapse
Автор
Сообщение
17.05.2005 14:46
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 02.05.2008 1:27
Сообщ.: 313, Visits: 2 982
есть форма по сабмиту вызывается перловый файл который должен получить параметры из формы.
не мог бы кто-нибудь привести пример как это делается для post и get методов?
Сообщ. #868913
18.05.2005 10:12
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 13.07.2006 17:05
Сообщ.: 124, Visits: 1 356
Если вы начинающий perl программист, то рекомендую использовать модуль CGI.pm, он идет в поставке со всеми дистрибутивами выше 5.0

Там все не просто - а очень просто. Пример скрипта:

#!/usr/bin/perl

use CGI qw(param);

my $var=param('id');# к примеру в скрипт передается методом или post/get такая переменная script.cgi?id=123

Теперь в переменной $var содержится значение этого параметра (в нашем примере оно равно - 123).

Рекомендую еще почитать это:
perldoc CGI

P.S Для модуля неважно каким методом отправляется информация - POST или GET - он парсит все.


PerlMonks.Org.Ru.... coming soon
Сообщ. #868999
19.05.2005 11:08
Forum Member

Forum MemberForum MemberForum MemberForum MemberForum MemberForum MemberForum MemberForum Member

участник
Last Login: 10.05.2007 4:18
Сообщ.: 27, Visits: 290
Привет!
Также удобно то что можно принимать данные не просто с формы,
а с форм с выбором файлов.

Например в технологии Java Servlet\JSP это не так явно.
Сообщ. #869135
23.05.2005 13:04
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 02.05.2008 1:27
Сообщ.: 313, Visits: 2 982
2 PoizOn

сделал также:

#!/usr/bin/perl

use CGI qw(param);
my $var=param('id');


Параметр не определяется :(((
Сообщ. #869495
23.05.2005 14:22
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 13.07.2006 17:05
Сообщ.: 124, Visits: 1 356
то есть не определяется?

#!/usr/bin/perl

$|=1;

use CGI qw(param header);

my $var=param('id');

print header();
print $var;

При обращении к этомуц скрипту примерно так:

http://localhost/cgi-bin/script.pl?id=123

в броузере будет печатать
123


PerlMonks.Org.Ru.... coming soon
Сообщ. #869504
23.05.2005 18:13
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 02.05.2008 1:27
Сообщ.: 313, Visits: 2 982
Что-то странное: на одной машине где перл под юникс эта штука не работает, а на другой, где перл под винду(только что проверил) - все работает...
чудеса...
Сообщ. #869541
23.05.2005 18:14
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 02.05.2008 1:27
Сообщ.: 313, Visits: 2 982
Что-то странное: на одной машине где перл под юникс эта штука не работает, а на другой, где перл под винду(только что проверил) - все работает...
чудеса...
Сообщ. #869542
24.05.2005 9:52
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 13.07.2006 17:05
Сообщ.: 124, Visits: 1 356
Значит на юниксе perl версии 5.0.x и там не идет в дистрибутиве модуль CGI (его надо отдельно ставиьт) - но лучше обнови perl до версии 5.8.6

PerlMonks.Org.Ru.... coming soon
Сообщ. #869598
« пред. тема | след. тема »


Эту тему читают Expand / Collapse
Посетители: 0 (0 гостей, 0 участников, 0 скрыт.участников)
Сейчас нет участников, просматривающих тему.
Модераторы: Alexey, boombastik, bazile, pl