URL: https://www.opennet.me/cgi-bin/openforum/vsluhboard.cgi
Форум: vsluhforumID8
Нить номер: 4250
[ Назад ]

Исходное сообщение
"CGI.pm"

Отправлено sudomen , 20-Июл-06 13:09 
Создал страничку на CGI.pm. Все значения посылаемые из форма ловлю $q = param('name') это просто,а вот как мне отловить саму переменную name, т.е. мне в зависимости от name нужно выполнить некоторое условие.

Содержание

Сообщения в этом обсуждении
"CGI.pm"
Отправлено mrwel , 21-Июл-06 08:25 
>Создал страничку на CGI.pm. Все значения посылаемые из форма ловлю $q =
>param('name') это просто,а вот как мне отловить саму переменную name, т.е.
>мне в зависимости от name нужно выполнить некоторое условие.


Что значит "саму переменную"?

Вот смотря что пришло, делаем:

my $q = param('name');
if($q eq 'some'){
   ...
}else{
   ...
}


"CGI.pm"
Отправлено sudomen , 21-Июл-06 13:41 
>>Создал страничку на CGI.pm. Все значения посылаемые из форма ловлю $q =
>>param('name') это просто,а вот как мне отловить саму переменную name, т.е.
>>мне в зависимости от name нужно выполнить некоторое условие.
>
>
>Что значит "саму переменную"?
>
>Вот смотря что пришло, делаем:
>
>my $q = param('name');
>if($q eq 'some'){
>   ...
>}else{
>   ...
>}

это понятноб а мне надо принумать условние не позначению name, а в зависимости от самой name или чето еще, а потом по заначению этой name.
Возможен ли такой вариант ???


"CGI.pm"
Отправлено rWizard , 22-Июл-06 15:26 

my $params = Vars();
if (defined $params{"name1"}) {...}
elsif ( defined $params{"name2"} ) {...}

или
my @param_names = param();

perldoc CGI
FETCHING THE PARAMETER LIST AS A HASH
или
FETCHING THE NAMES OF ALL THE PARAMETERS PASSED TO YOUR SCRIPT