The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]




Версия для распечатки Пред. тема | След. тема
Новые ответы [ Отслеживать ]
Socks In Perl, !*! Raist, 01-Окт-06, 19:25  [смотреть все]
  • Socks In Perl, !*! Raist, 19:28 , 01-Окт-06 (1)
  • Socks In Perl, !*! Kuzik, 10:04 , 30-Янв-07 (2)
    Ты коннектишься к билли на почту. Он ее не любит.
    Поставь адрес реального сервера и сервиса.

    >необходимо написать отправку писем через сокс сервер. Использую модуль Net::SOCKET:SOCKS
    >Судя по докуменатции он возвращает обьект который потом можно использовать как обычный
    >обьект класса Net::SOCKET. Тоесть я пишу (например)
    >
    >       my $socket = new IO::Socket::Socks(ProxyAddr=>'192.1.1.1',
    >                                           ProxyPort=>'1111',
    >                                           ConnectAddr=>'microsoft.com',
    >                                           ConnectPort=>25,
    >                                           SocksDebug=>1);
    >
    >        sysread ($socket,$buf,4096);
    >        print $buf;
    >
    >И на экран должно вывести нечто вроде
    >220 Welcomo to Bill SMTP Server
    >Если конечно все нормально создалось (ну положим у нас есть проверка сокета
    >на undef)
    >...Короче говоря нифига не работает :) Сокет создается, но ничего из него
    >не читает  :((
    >Почему и что делать? Может этот модуль нормально не работает и нужно
    >воспользоватся другим? Подскажите хотя бы в какую сторону копать плз....





Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру