yeah has asked for the wisdom of the Perl Monks concerning the following question:
$ cat testSSL.pl # https-test.pl - HTTPS GET example # # c Copyright, 2004-2005 By John Bokma, http://johnbokma.com/ # # Last updated: 2006-05-22 18:54:19 -0500 #!/usr/bin/perl -w use strict; use warnings; use LWP::Debug qw(+); use LWP::UserAgent; my $url = 'https://www.helsinki.fi/'; my $ua = LWP::UserAgent->new; my $response = $ua->get( $url ); $response->is_success or die "Failed to GET '$url': ", $response->status_line; print $response->as_string; Here is the result: $ perl testSSL.pl LWP::UserAgent::new: () LWP::UserAgent::request: () LWP::UserAgent::send_request: GET https://www.helsinki.fi/ LWP::UserAgent::_need_proxy: Not proxied LWP::UserAgent::request: Simple response: Not Implemented Failed to GET 'https://www.helsinki.fi/': 501 Protocol scheme 'https' +is not sup ported (Crypt::SSLeay not installed) at testSSL.pl line 19. $
I've tried looking at everything including file permissions, path variables, etc. I've thought about dropping down to Perl 8.8.x just to see what happens, but... It would be great to get some work done so any help would be appreciated. And yes Ive looked at the responses here as well.
|
|---|