To anyone who has an idea how to accomplish this using perl libraries please
advise.

I am trying to access an https page by going through an http proxy, code is
as follows.
I get back an empty document, if I don't go through a proxy the https code
works 
if I use http i get through the proxy.

use LWP::UserAgent;
use Crypt::SSLeay; 
use LWP::Debug qw(+);
use LWP::Debug qw(level); level('+');
use Crypt::SSLeay::MainContext qw(main_ctx);

$ua = LWP::UserAgent->new;
$ua->agent("SSL-Surfer/1.0");
$ua->proxy(['http','ftp','https'] => 'http://proxy:80');
$request = HTTP::Request->new(GET =>'https://httpssite'); 
$request->proxy_authorization_basic("proxy_account","proxy_name");
$res = $ua->request($request);
if ($res->is_success) {
      print $res->content; 
} else {
      print "Failed: ", $res->status_line, "\n";
}

Thanks in advance
_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-web

Reply via email to