On Thu Apr 24 17:31:49 2014, martineau.jl@gmail.com wrote:
Show quoted text>
> A new release with this patch will be appreciated by all vmware users,
> downgrading LWP and Net::SSL will no longer be required.
This patch doesn't work for me to fix the VMware Perl SDK. What does work is to remove the parts in VICommon.pm that explicitly require Net::SSL or Crypt::SSLeay.
--- /Users/wfaulk/Downloads/vmware-vsphere-cli-distrib/VMware/VICommon.pm 2014-10-15 15:35:38.000000000 -0400
+++ VICommon.pm 2014-10-23 18:50:03.000000000 -0400
@@ -424,15 +424,6 @@
my $url = shift;
my %supportedapiversions;
if ($url =~ s|http(s?)://(.*)/sdk.*|http$1://$2/sdk/vimService.wsdl|i) {
- if ($1 eq "s") {
- eval {
- require Crypt::SSLeay;
- Crypt::SSLeay->import();
- };
- if ($@) {
- die "Crypt::SSLeay is required for https connections, but could not be loaded: $@";
- }
- }
my $temp_addr = $2;
if ($temp_addr =~ /:/) {
@@ -501,23 +492,11 @@
sub query_server_version {
BEGIN {
- #To remove SSL Warning, switching from IO::Socket::SSL to Net::SSL
- $ENV{PERL_NET_HTTPS_SSL_SOCKET_CLASS} = "Net::SSL";
#To remove host verification
$ENV{PERL_LWP_SSL_VERIFY_HOSTNAME} = 0;
}
my $url = shift;
if ($url =~ s|http(s?)://(.*)/sdk.*|http$1://$2/sdk/vimService.wsdl|i) {
- # bug 288336
- if ($1 eq "s") {
- eval {
- require Crypt::SSLeay;
- Crypt::SSLeay->import();
- };
- if ($@) {
- die "Crypt::SSLeay is required for https connections, but could not be loaded: $@";
- }
- }
# no IPv6 support yet
my $temp_addr = $2;
if ($temp_addr =~ /:/) {
