|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Aleksey Kirpichnikow 2:5020/400 08 Aug 2000 11:06:41
To : All
Subject : Re: оHЛHЦХРЕ..
--------------------------------------------------------------------------------
On Mon, 07 Aug 00 02:45:06 +0300, in fido7.ru.cgi.perl you wrote:
> Hello All!
>
> только начал изучать Пеpл, взял доков много, но что-то ничего не получается..к
> пpимеpу:
> ----------------------
> #!/Website/Perl/Bin/perl.exe
> #test.pl
> read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
>
> @pairs = split(/&/, $buffer);
> foreach $pair (@pairs) {
> ($name, $value) = split(/=/, $pair);
> $value =~ tr/+/ /;
> $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
> $value =~ s/<!--(.|\n)*-->//g;
> $input{$name} = $value;
> }
> print "Content-Type: text/html\n\n";
>
> print "<html>\n<head>\n<title></title>\n</head>";
> print "<body>\n";
> print "Имя: ",$input('user_name'),"\n<br>";
^^ ^^
скобки { }
> print "</body>\n</html>";
> -------------------------------------
> путь у меня к Пеpлу написан пpавельно, все запускается, но вот почему-то
> не выводится у меня, то что я записал в поле с именем 'user_name'.
>
>
> Bye, Alexey. ICQ: 78482898
> [MFD - team Diablo II][mfd_clan@diablo-ii.ru][http://mfd-clan.narod.ru]
Для массива ассоциативного используются {} скобки, для номера элемента [] скобки
() скобки это совсем из другой оперы
Ex: $input{'user_name'} - значение ключа user_name
$input[1] - 2й элемент массива $input
Алексей Кирпичников
--- ifmail v.2.15dev5
* Origin: PACOnet (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
