Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
[Perl] Как создать сокет через прокси? 23.08.03 17:39
Автор: Hux0r Статус: Незарегистрированный пользователь
|
Объясните начинающему как это реализовать.
Допустим есть программа создающая сокет и делающая кое-какую работу:
#!perl
use Socket;
$Server=www.server.com;
$Port=80;
print "Content-type: text/html\n\n";
print "Connect> $Server :$Port ...\t";
socket (MyConn, PF_INET(), SOCK_STREAM(), getprotobyname("tcp")|6);
$ok=connect (MyConn, sockaddr_in($Port,inet_aton($Server)));
if ($ok!= 0)
{print "OK\n";
#Идем дальше...
}
else {print "connection refused\n";close (MyConn);exit;}
---
Но мой комп в локалке, т.е. в интернет я выхожу через наш http-прокси
Как мне переписать программу чтобы она создавала это tcp-соединение через http-прокси? Или это невозможно сделать впринципе?
|
|
[Perl] Точно так же как и обычно 23.08.03 18:34
Автор: amirul <Serge> Статус: The Elderman
|
> Но мой комп в локалке, т.е. в интернет я выхожу через наш > http-прокси > Как мне переписать программу чтобы она создавала это > tcp-соединение через http-прокси? Или это невозможно > сделать впринципе? Просто коннектишься вместо самого хоста к прокси, а потом все как обычно
GET /path/to/resouce.htm HTTP/1.1
Host: www.somehost.domain
Проксику достаточно такой информации, чтоб перенаправить запрос
|
|
|