|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Chuprina 2:5020/371.32 25 Aug 2000 19:07:51
To : Dmitry Beda
Subject : Re: Trabl
--------------------------------------------------------------------------------
<Dmitry_Beda@p1.f5.n455.z2.fidonet.org> wrote:
DB> Мое почтение All!
DB> Пеpедается следующие паpаметpы:
DB> USER=0...admin&URL=3...http://la.la.la/mp3
DB> возвpащает не
DB> USER=0
DB> URL=3
DB> а
DB> USER=4
DB> URL=12
DB> в чем ошибка?
DB> ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД Старт ADD.PL ДДДДДДДДДДДДДДДДДДД ДД Д ъ
DB> #!/usr/local/bin/perl
DB> print "Content-type: text/html\n\n";
DB> print "<HTML>\n<BODY>\n<TITLE></TITLE>\n";
DB> read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
DB> @pairs=split(/&/, $buffer);
DB> print "$buffer";
DB> # This is the Name-Value pair splitter..
DB> # Put into $FORM array
DB> foreach $pair (@pairs) {
DB> ($name,$value)=split(/=/,$pair);
DB> $value=split(/.../,$value);
Эта строчка читается так: "разрезать $value, использовав в качестве разделителя
три любых символа; вернуть количество элементов". То, что ты имел в виду,
записывается
($value) = split(/\.\.\./,$value);
а документацию иногда читать полезно.
--
Счастливо!
Ран.
--- ifmail v.2.14.os-p7-tma3
* Origin: MemoNet (2:5020/371.32@fidonet)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
| Тема: |
Автор: |
Дата: |
|
Re: Trabl |
Artem Chuprina |
25 Aug 2000 19:07:51 |
|
|
