|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Roman Yerin 2:5020/400 31 Mar 2002 11:24:55 To : toxide Subject : Re: some грабли --------------------------------------------------------------------------------
проблема решается путем замены sysread на read...не знаю чтот там
происходит, но факт....
в любом случае (как тебе и скажут почти все в эхе) неплохо было бы
использовать стандартные модули... CGI.pm например...
и сделать примерно как то вот так
#!/usr/bin/perl -w
use strict;
use CGI qw/:standard/;
my $query=param('newmsg');
print $query;
почему то мне кажется, что так он будет работать
"toxide" <vault@ukrpost.net> wrote in message
news:a8420s$o4a$1@host.talk.ru...
>
> Я юзаю:
> Win98 (знаю знаю.... но я же дома сейчас)
> ActivePerl 5.004
> Apache 1.3.23 (ессно под Win32)
>
> Заметил грабли:
> Hе отсылается пост больше 2 или 3 (в этих пределах) килобайт.
>
> Hа упрощенной задаче cделал:
> HTML запросник:
> >-------------------------
> <html>
> <form action="http://localhost/cgi-bin/post" method="POST">
> <textarea name="NewMsg" rows="20" cols="60"></textarea><br>
> <input type="submit" name="Send" value="Отправить">
> </form>
> </html>
> <-------------------------
>
>
> PERL (http://localhost/cgi-bin/post)
> >-------------------------
> #!/usr/local/bin/perl
>
> print "Content-type: text/plain\n\n";
> sysread(STDIN,$query,$ENV{'CONTENT_LENGTH'});
> print "$query";
> <-------------------------
>
> Маленькие запросы проходят отлично.
> Большие просто - запрос пошел и все...
>
>
> Учитывая недавнее юзание перла надеюсь на ваши подсказки.
> Заранее спасибо.
> Влад.
>
>
>
> -- -- -- -- -- -
> Только сядешь поработать, обязательно кто-нибудь разбудит!
> --
> Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Talk.Mail.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6488768a2cc9.html, оценка из 5, голосов 10
|