|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Vadim Tzirulnicov 2:5020/400 19 Nov 2002 16:29:36 To : All Subject : POST --------------------------------------------------------------------------------
Здравствуйте !
Как скриптом, соединившись с сервером, вызвать CGI-скрипт и передать
ему в STDIN методом "POST" данные ?
Пробовал
$meethost="localhost";
$port="80";
socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname('tcp'));
$iaddr=inet_aton($meethost);
$paddr=sockaddr_in($port, $iaddr);
connect(SOCK, $paddr);
send (SOCK, "POST /cgi-bin/test.pl HTTP/1.0\nHOST:$meethost\n\n", 0);
print SOCK $wr;
close(SOCK);
- скрипт "test.pl" вызывается с $ENV{'REQUEST_METHOD'}, равным "POST", но
STDIN пуст...
В интернете есть примеры только по соединению через сокет с использованием
метода "GET"...
С уважением, Вадим.
E-mail: tzirulnicov@mail.ru
Site: http://tzirulnicov.rdcom.ru/htmleditor/download.php
--- ifmail v.2.15dev5
* Origin: MTU-Intel ISP (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/9104a80f349b.html, оценка из 5, голосов 10
|