Dont require SSL.pm unless its installed

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3372 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
nott 2009-05-13 15:19:03 +00:00
parent 71ac4913b7
commit 4829a2bca2

View File

@ -26,7 +26,11 @@
# MAIN
use strict;
use IO::Socket;
use IO::Socket::SSL;
my $useSocketSSL=eval { require IO::Socket::SSL; };
if ($useSocketSSL) {
require IO::Socket::SSL;
}
my $rc = 0;
# Override from site table