|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexey Domanski 2:451/23.22 26 Mar 2002 00:58:53 To : All Subject : Соединение через прокси --------------------------------------------------------------------------------
Мучает вопрос: как установить соединение через прокси.
Как соединиться через прокси сервер?
Код такой:
socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname('tcp'));
$host="www.tb.by";
$port="80";
$iaddr = inet_aton($host);
$paddr = sockaddr_in($port, $iaddr);
connect(SOCK, $paddr);
send (SOCK,"GET
/nb.phtm?currency=USD,EUR,USD/RUS&outbgcolor=ffffff&outfgcolor=000009f&inbgcol
or=ffffff&infgcolor=666600&outborder=0&inborder=1&width=120&short=1&language=R
HTTP/1.0\nHOST:$host\n\n", 0);
@data=<SOCK>;
close(SOCK);
С уважением, Alexey
E-Mail: DAV_support@mail.ru
--- GoldED/W32 3.0.1
* Origin: (2:451/23.22)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/27273c9fbab7.html, оценка из 5, голосов 10
|