I don't want low level programming, if anyone has samplecode, please post it.
Best regards,
Andreas
http://www.byte.com/documents/s=493/byt20010214s0005/index3.htm
http://www.perlmonks.org/index.pl?node_id=179922
http://groups.google.de/ groups?q=perl+SSL+HTTP::Daemon&hl=de&lr=&ie=UTF- 8&selm=3CB9EFAF.80809%40computer.org&rnum=1
Am Sonntag, 24.11.02 um 17:54 Uhr schrieb Keary Suska:
I've installed all recommend modules.on 11/22/02 7:40 AM, [EMAIL PROTECTED] purportedly said:I have the problem to handle CONNECT requests with LWP, serval times
discuss but not really solved in my opinion. What should be a useable
way to enable ssl-support, install an old version of libwww with regard
to the bugfix-report on sourceforge by patching http.pm and https.pm or
has anyone a better solution?
1. Install openssl (http://www.openssl.org) 2. Install Bundle::LWP (use perl -MCPAN -e shell) 3. Install Crypt::SSLeay (same as LWP)
Ok, I've the problem to handle client-requests about the browser, the script should be a proxy with logging-capable.
If I define a request-object like
my $req = new HTTP::Request('GET', 'https://www.nodeworks.com');
or get one about the HTTP::Daemon
my $req = new HTTP::Request('CONNECT', 'http://www.nodeworks.com:443');
, only the first works. I've read something about patching the Daemon, other people choose the way to patch http.pm - Modules.
use LWP::Simple;
use LWP::UserAgent;
use LWP::Protocol::https;
LWP::Debug::level('+');
my $ua = new LWP::UserAgent;
#my $req = new HTTP::Request('CONNECT', 'http://www.nodeworks.com:443');
my $req = new HTTP::Request('GET', 'https://www.nodeworks.com');
my $res = $ua->request($req);
print $res->code."\n";
Now you have https support with LWP.Another point I'm wondering about is that the latest libwww-packagePerhaps, but there are likely bug fixes that you will want. Best to keep it
isn't extented in the functionality, or I'm be under a misapprehension.
up to date.
Keary Suska
Esoteritech, Inc.
"Leveraging Open Source for a better Internet"
___ Andreas Niemeyer
