Автор Тема: Perl + SSL + Proxy  (Прочитано 3968 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн wmegold

  • Заглянувший
  • Новичок
  • *
  • Сообщений: 8
  • +0/-0
  • 0
    • Просмотр профиля
    • http://www.wmegold.com
Perl + SSL + Proxy
« : 04 Сентября 2003, 10:36:14 »
Только плз не нужно меня посылать на поиск, искал по форуму и нашел, но там у всех были траблы в том, что скрипт не работал, у меня работает, только проблема в другом

Есть следующий простенький скрипт
++++++++++++++++++++++++++++++++++++++++++++++++
#!/usr/bin/perl
                     
use LWP::UserAgent;
my $ua = LWP::UserAgent->new;
$ua->agent("Mozilla/5.0 (compatible; MSIE 5.01; Windows NT 5.0)");
$ua->proxy(https => \'http://my_proxy:port\');
$url = "https://www.domain.com/asp/script.asp?name=value";
my $req = HTTP::Request->new(GET => $url);
my $res = $ua->request($req);
  if ($res->is_success)
  {
      print $res->as_string;
  }
  else
  {
     print "Error: " . $res->status_line . "\\n";
  }
++++++++++++++++++++++++++++++++++++++++++++++++
вся фигня в том, что если убрать строку с проксей, все отлично работает, но если оставить, выдается 403 ошибка -Доступ запрещен.
То, что прокся анонимная, не передает абсолютно ничего лишнего и работает - это 100%, проблема в том, что сервер, которому передаются параметры, каким-то образом видит, что соединение идет именно через проксю, или lwp передает или не передает какие-то заголовки при использовании $ua->proxy, или еще что-то. Помогите плз разобраться.
Или может как-нибудь по-другому можно сделать https запрос через проксю ? :(

Помогите плз, заплачу

Оффлайн NeoNox

  • Координатор
  • Глобальный модератор
  • Ветеран
  • *****
  • Сообщений: 3012
  • +0/-0
  • 0
    • Просмотр профиля
Perl + SSL + Proxy
« Ответ #1 : 04 Сентября 2003, 11:13:21 »
С выражением читаю perldoc lwpcook особенно в разделе PROXIES.
Недорого. Писать в приват.
The documentations is your friend

Оффлайн Chs

  • Perl программер
  • Глобальный модератор
  • Ветеран
  • *****
  • Сообщений: 1108
  • +0/-0
  • 2
    • Просмотр профиля
    • http://chs.now.at/
Perl + SSL + Proxy
« Ответ #2 : 04 Сентября 2003, 17:16:00 »
NeoNox,
Ээээ...у меня https через прокси так и не заработал - пришлось без прокси делать.
2B OR NOT 2B = FF

Оффлайн wmegold

  • Заглянувший
  • Новичок
  • *
  • Сообщений: 8
  • +0/-0
  • 0
    • Просмотр профиля
    • http://www.wmegold.com
Perl + SSL + Proxy
« Ответ #3 : 04 Сентября 2003, 17:26:13 »
Да у меня работает, только вот не все сайты

Оффлайн NeoNox

  • Координатор
  • Глобальный модератор
  • Ветеран
  • *****
  • Сообщений: 3012
  • +0/-0
  • 0
    • Просмотр профиля
Perl + SSL + Proxy
« Ответ #4 : 04 Сентября 2003, 18:43:23 »
ChsЗдесь волшебное слово Crypt::SSLeay ;)
The documentations is your friend

Оффлайн Chs

  • Perl программер
  • Глобальный модератор
  • Ветеран
  • *****
  • Сообщений: 1108
  • +0/-0
  • 2
    • Просмотр профиля
    • http://chs.now.at/
Perl + SSL + Proxy
« Ответ #5 : 05 Сентября 2003, 10:07:29 »
NeoNox
Да знаю я это волшебное слово - без толку.:)
2B OR NOT 2B = FF

Оффлайн arto

  • Ветеран
  • *****
  • Сообщений: 699
  • +0/-0
  • 2
    • Просмотр профиля
Perl + SSL + Proxy
« Ответ #6 : 07 Сентября 2003, 18:55:15 »
какая проблема?

Оффлайн Chs

  • Perl программер
  • Глобальный модератор
  • Ветеран
  • *****
  • Сообщений: 1108
  • +0/-0
  • 2
    • Просмотр профиля
    • http://chs.now.at/
Perl + SSL + Proxy
« Ответ #7 : 08 Сентября 2003, 11:42:17 »
arto
Проблема:
LWP + Crypt::SSLeay
Запрос по https
Без прокси работает, как только ставишь прокси запрос не проходит.
Варианты прокси были:
$ua->proxy(https => \'http://my_proxy;port\');
$ua->proxy(https => \'https://my_proxy:port\');
Все без разницы.
Собственно в исходном вопросе такая же проблема. libwww был последний.
2B OR NOT 2B = FF

 

Sitemap 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28