#############################################
HTTP/1.0 200 OK
Content-Type: text/html
Client-Date: Fri, 13 Dec 2002 02:39:25 GMT
Client-Response-Num: 1
Refresh: 0; URL=https://www.ultimatix.net
<HTML></HTML>
############################################
This happens whatever I try to do. I have tried out almost every thing. I have even created ssl certificate and used the same. But nothing works. I do not get the content.
My code looks like thisPlease bail me out. Suggest me a way to make HTTPS request across the proxy.sub GetBaseURL{ my($lstrURL)=@_; my $ua = LWP::UserAgent->new; $ua->agent("MyApp/0.1"); $ua->proxy([qw(https http)], "http://proxy.compaq.com:8080"); $ENV{HTTPS_VERSION}='3'; #$ENV{HTTPS_CERT_FILE}="C:/openssl/private/CAcert.pem"; #$ENV{HTTPS_KEY_FILE}="C:/openssl/private/CAkey.pem"; $ENV{HTTPS_PKCS12_FILE}="C:/openssl/binu.p12"; $ENV{HTTPS_PKCS12_PASSWORD}='passcode'; #$ENV{HTTPS_PROXY}="http://proxy.compaq.com:8080"; $ua->timeout(1000); my $request=HTTP::Request->new(POST=> $lstrURL); my $response=$ua->request($request); #my $response=$ua->get($lstrURL) or die "cannot fetch $lstrURL: $!"; if ($response->is_success){ return $response->as_string; }else{ return $response->code; } }
In reply to HTTPS Call across proxy server by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |