[PERL] как работать с данными POST

И всё прочее, что касается HTML
Правила форума
Убедительная просьба юзать теги [code] при оформлении листингов.
Сообщения не оформленные должным образом имеют все шансы быть незамеченными.
Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

[PERL] как работать с данными POST

Непрочитанное сообщение Alex Keda » 2010-02-18 13:20:22

сабж. ни одного примера не нашёл.
может как-то неправильно ищщу?
Убей их всех! Бог потом рассортирует...

Хостинговая компания Host-Food.ru
Хостинг HostFood.ru
 

Услуги хостинговой компании Host-Food.ru

Хостинг HostFood.ru

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 13:29:40

бедный деный Лис

Код: Выделить всё

use CGI qw/:standard/;

if(request_method() eq 'POST'){
  $comment = param('field_comment') if(param('field_comment') && length(param('field_comment')) < 100);
  ....
}
кстате

Код: Выделить всё

perldoc CGI
Последний раз редактировалось hizel 2010-02-18 13:30:46, всего редактировалось 1 раз.
Причина: кста
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: [PERL] как работать с данными POST

Непрочитанное сообщение Alex Keda » 2010-02-18 13:56:05

хорошо.
а как сделать то что в php одной строкой:

Код: Выделить всё

var_dump($_POST)
? ибо я не знаю как будет называться параметр...
Убей их всех! Бог потом рассортирует...

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 14:28:12

не будь лапшой позырь perldoc CGI
FETCHING A LIST OF KEYWORDS FROM THE QUERY:
@keywords = $query->keywords

If the script was invoked as the result of an <ISINDEX> search, the parsed keywords can be obtained as an array using the keywords() method.

FETCHING THE NAMES OF ALL THE PARAMETERS PASSED TO YOUR SCRIPT:
@names = $query->param

If the script was invoked with a parameter list (e.g. "name1=value1&name2=value2&name3=value3"), the param() method will return the parameter names as a list. If
the script was invoked as an <ISINDEX> script and contains a string without ampersands (e.g. "value1+value2+value3") , there will be a single parameter named
"keywords" containing the "+"-delimited keywords.

NOTE: As of version 1.5, the array of parameter names returned will be in the same order as they were submitted by the browser. Usually this order is the same as
the order in which the parameters are defined in the form (however, this isn't part of the spec, and so isn't guaranteed).
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 14:29:36

если у тебя микс GET и POST
MIXING POST AND URL PARAMETERS
$color = url_param('color');

It is possible for a script to receive CGI parameters in the URL as well as in the fill-out form by creating a form that POSTs to a URL containing a query string (a
"?" mark followed by arguments). The param() method will always return the contents of the POSTed fill-out form, ignoring the URL's query string. To retrieve URL
parameters, call the url_param() method. Use it in the same way as param(). The main difference is that it allows you to read the parameters, but not set them.

Under no circumstances will the contents of the URL query string interfere with similarly-named CGI parameters in POSTed forms. If you try to mix a URL query
string with a form submitted with the GET method, the results will not be what you expect.
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: [PERL] как работать с данными POST

Непрочитанное сообщение Alex Keda » 2010-02-18 14:57:52

толи лыжи не едут...

Код: Выделить всё

[Thu Feb 18 14:55:15 2010] [error] [client 195.93.241.11] Can't call method "keywords" on an undefined value at testperl.pl line 11., referer: http://doska.lissyara.su/aaa.html

[Thu Feb 18 14:56:45 2010] [error] [client 195.93.241.11] Can't call method "param" on an undefined value at testperl.pl line 12., referer: http://doska.lissyara.su/aaa.html
вот за это я и ненавижу перл.
примеры из доки не работают.
в php - все примеры всегда рабочие.
Убей их всех! Бог потом рассортирует...

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 15:00:12

ну и пользуй пых

где твой код? я его не наблюдаю

кто-то видимо забил на четкое указание:

Код: Выделить всё

use CGI qw/:standard/;
:roll:
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: [PERL] как работать с данными POST

Непрочитанное сообщение Alex Keda » 2010-02-18 15:02:35

Код: Выделить всё

hosting$ more ~lissyara/www/data/cgi-bin/testperl.pl
#!/usr/bin/perl -w
#


use CGI qw/:standard/;

print "Content-type: text/plain; charset=iso-8859-1\n\n";

if(request_method() eq 'POST'){

        #@keywords = $query->keywords;
        @names = $query->param;
        foreach $key (@names)
        {
                print "name = $key; value = " . param($key) . "\n\n";
        }

        exit;
        #$comment = param('domain');
        if(param('domain') && length(param('domain')) > 3){
                print "Content-type: text/plain; charset=iso-8859-1\n\n";
                print param('domain') . "\n";

        }
}
Убей их всех! Бог потом рассортирует...

Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: [PERL] как работать с данными POST

Непрочитанное сообщение Alex Keda » 2010-02-18 15:08:11

ы-ы-ы-ы....
изыди!
или дефку эту не пихай везде хотя бы =)))
Убей их всех! Бог потом рассортирует...

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 15:22:03

тчёрт:

Код: Выделить всё

#!/usr/bin/perl

use CGI qw/:standard/;

print header;

print '<html><head><title>post test</title></head>';

if(request_method() eq 'POST'){
  my @names = param;
  print '<body>';
  for $key (@names){
        print '<p>', $key, '=>', param($key), '</p>';
  }
  print '</body>';
}else{
  print '<body><form action="" method="post"><input type="text" name="login"><input type="submit" value="submit"></form></body>'
}

print '</html>';
 
сравни со своим
Последний раз редактировалось hizel 2010-02-18 15:35:03, всего редактировалось 2 раза.
Причина: уформатировался
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 15:24:40

ну ты даешь

откуда у тебя в коде @names = $query->param; вылезло !?
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 15:35:28

почему в этом дурацком phpbb3 подсветка только для пыха !?
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
thefree
лейтенант
Сообщения: 980
Зарегистрирован: 2008-12-29 9:23:19
Откуда: Весёлая Страна

Re: [PERL] как работать с данными POST

Непрочитанное сообщение thefree » 2010-02-18 16:16:03

QUERY_STRING
Не судите меня строго, Я не волшебник, а только учусь!
http://planetbsd.ru - RSS-агрегатор *BSD по Рунету

Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: [PERL] как работать с данными POST

Непрочитанное сообщение Alex Keda » 2010-02-18 17:47:42

срослось, всем пасиба!
Убей их всех! Бог потом рассортирует...

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 17:49:24

lissyara писал(а):срослось, всем пасиба!
ты написал на пэхопэ? :D
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: [PERL] как работать с данными POST

Непрочитанное сообщение Alex Keda » 2010-02-18 19:32:36

нет. он плохо подходит для системного языка программирования.
жаль что на шелле POST не разберёшь, иначе скрипт так и остался бы шелловым =))
Убей их всех! Бог потом рассортирует...

zg
полковник
Сообщения: 5845
Зарегистрирован: 2007-12-07 13:51:33
Откуда: Верх-Нейвинск

Re: [PERL] как работать с данными POST

Непрочитанное сообщение zg » 2010-02-18 20:17:08

lissyara писал(а):нет. он плохо подходит для системного языка программирования.
значит ты просто не умеешь его готовить :smile:
hizel писал(а):почему в этом дурацком phpbb3 подсветка только для пыха !?
потому что она встроена в пых
lissyara писал(а):жаль что на шелле POST не разберёшь
почему? http://anton-pribora.ru/cgi-bin/post.cgi

Код: Выделить всё

% cat cgi-bin/post.cgi
#!/bin/sh

echo 'Content-type: text/html'
echo

echo '<form method="POST">'
echo '  <input type="text" name="hello" value="world">'
echo '  <input type="submit" value="send">'
echo '</form>'

echo '<pre>POST-data'
cat
echo '</pre>'
:unknown: разбирай не хочу

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 20:27:08

пэхапэшники такие пэхапэшники, о безопасности думаем в последнею очередь и размазываем критические участки по всему коду, жрите пользователи : )
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

zg
полковник
Сообщения: 5845
Зарегистрирован: 2007-12-07 13:51:33
Откуда: Верх-Нейвинск

Re: [PERL] как работать с данными POST

Непрочитанное сообщение zg » 2010-02-18 20:31:23

hizel писал(а):размазываем критические участки по всему коду
например?
hizel писал(а):пэхапэшники такие пэхапэшники
эммм, где тут пхп? :smile:

Аватара пользователя
ADRE
майор
Сообщения: 2645
Зарегистрирован: 2007-07-26 8:53:49
Контактная информация:

Re: [PERL] как работать с данными POST

Непрочитанное сообщение ADRE » 2010-02-18 21:03:57

hizel писал(а):пэхапэшники такие пэхапэшники, о безопасности думаем в последнею очередь и размазываем критические участки по всему коду, жрите пользователи : )
ага... учите нас перлу =)
//del

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] как работать с данными POST

Непрочитанное сообщение hizel » 2010-02-18 21:51:43

zg этот наброс относился к сгенерированому Лисом коду, плохое наследство пых юнности :)
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.