Greetings,

I'm runing ASPerl build 633(v5.6.1 built for MSWin32-x86-multi-thread) on
win2k box.  I'm behind a fire wall and I have to had a proper proxy setting
before I can access the internet.

I have got no problem with http GET/POST.  After some struggles, I finally
added SSL support to my LWP and have both GET and POST works. Well, sort of
:(  I can only do GET/POST to some web sites.  For some sites, I am still
having  problem "500 (Internal Server Error) Can't connect to
www.nodeworks.com:443 (Bad hostname 'www.nodeworks.com')".  It seems got
something to do my proxy server failed to resolve the url address for some
sites only, I got no ieda why.  Could it have anything to do with the site
I'm trying to access?

Enclose below are call traces and source code, which I hope will give you
some idea what's happened and hopefully, someone might be point out what's
might be wrong.

Any help and advice is much appreciated.

Regards,
WWang

----------------------------------------8<----------------------
LWP::UserAgent::new: ()
LWP::UserAgent::request: ()
LWP::UserAgent::send_request: POST
https://login.yahoo.com/config/login?3tuqsj3uiso3a
LWP::UserAgent::_need_proxy: Not proxied
LWP::Protocol::http::request: ()
LWP::Protocol::collect: read 120 bytes
LWP::UserAgent::request: Simple response: Found
......

With exactly the same syntax, only chage destination site url, I've got:
----------------------------------------8<----------------------
LWP::UserAgent::request: ()
LWP::UserAgent::send_request: GET https://www.nodeworks.com
LWP::UserAgent::_need_proxy: Not proxied
LWP::Protocol::http::request: ()
LWP::UserAgent::request: Simple response: Internal Server Error
500 (Internal Server Error) Can't connect to www.nodeworks.com:443 (Bad
hostname 'www.nodeworks.com')
Client-Date: Thu, 19 Dec 2002 06:15:12 GMT
----------------------------------------8<----------------------

##################################################
# source codes
use LWP::UserAgent;
use LWP::Debug qw(level); level('+');

$ua = new LWP::UserAgent;
##################################################
# PROXY SUPPORT for SSLeay module
$ENV{HTTPS_PROXY} = '127.0.0.1:8080';
$ENV{HTTPS_PROXY} = 'http://xxx:93';
$ENV{HTTP_PROXY} = 'http://YYY:3128';

my $req = new HTTP::Request
'POST','https://login.yahoo.com/config/login?3tuqsj3uiso3a';
$req->content_type('form-data');
$req->content('login=xxx&passwd=xxxxx');
my $res = $ua->request($req);
print $res->as_string;

##################################################
# 500 (Internal Server Error) Can't connect to .....
my $req = new HTTP::Request 'GET','https://www.nodeworks.com';
my $res = $ua->request($req);
print $res->as_string;
----------------------------------------8<----------------------

_______________________________________________
Perl-Win32-Web mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to