PLease help! Using LWP to check to see if Secure Server is running

2001-03-08 Thread Frank Belfie 





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]

RE: PLease help! Using LWP to check to see if Secure Server is running

2001-03-08 Thread Varga, Jack 

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 VargaSMTS  |   [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]
 
__
OpenSSL Project http://www.openssl.org
User Support Mailing List[EMAIL PROTECTED]
Automated List Manager   [EMAIL PROTECTED]

Re: PLease help! Using LWP to check to see if Secure Server is running

2001-03-08 Thread ACroft 

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 VargaSMTS|   [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]