Might look at the LWP::SecureSocket module in the CPAN archives. I've never tried it, but from the description it work with what you're looking to do. "Varga, Jack" wrote: > Sorry. This is not correct. LWP apparently doesn't > support HTTPS out of the box because of the complexities > associated with key exchanges and cert mgmt. > > > -----Original Message----- > > From: Varga, Jack [mailto:[EMAIL PROTECTED]] > > Sent: Thursday, March 08, 2001 2:39 PM > > To: '[EMAIL PROTECTED]' > > Subject: RE: PLease help! Using LWP to check to see if Secure > > Server is > > ru nning > > > > > > My guess is LWP by default sends requests to port 80. > > There must be a method to specify a different port... > > > > The request string where you specified the url... > > > > my $req = new HTTP::Request('GET', 'https://www.someserver.com'); > > > > ...just get's added the the http header inside the tcp > > payload and interpreted by the http daemon on port 80. > > > > -- > > Jack Varga SMTS | [EMAIL PROTECTED] > > Circadence Corporation | 303.413.8800 x 1082 > > 4888 Perl East Circle | Boulder, Colorado 80301 > > > > > > > -----Original Message----- > > > From: Frank Belfie [mailto:[EMAIL PROTECTED]] > > > Sent: Thursday, March 08, 2001 2:20 PM > > > To: [EMAIL PROTECTED] > > > Subject: PLease help! Using LWP to check to see if Secure Server is > > > running > > > > > > > > > > > > > > > > > > > > > use LWP::UserAgent; > > > my $ua = new LWP::UserAgent; > > > my $req = new HTTP::Request('GET', 'https://www.someserver.com'); > > > my $res = $ua->request($req); > > > print $res->code."\n"; > > > > > > > > > The return code is always 501 with secure servers, and 200 > > > with non-secure. > > > Should this code work? > > > > > > I know the ssl server is up and listening, yet I get the 501 > > > code. All I need > > > this to do is see if it is still taking requests. I > > > installed the openssl, and > > > all neccessary packages. > > > > > > RedHat 7.0, Perl5.6.0..... Doesn't throw any errors? > > > > > > Any help is very appreciated! > > > > > > Thanks, > > > > > > Frank Belfie > > > Datacomm Engineer > > > Commerce Bank, N.A. > > > [EMAIL PROTECTED] > > > > ______________________________________________________________________ OpenSSL Project http://www.openssl.org User Support Mailing List [EMAIL PROTECTED] Automated List Manager [EMAIL PROTECTED]
