mirror of
				https://github.com/xcat2/xcat-core.git
				synced 2025-10-30 19:02:27 +00:00 
			
		
		
		
	git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@14790 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
		
			
				
	
	
		
			27 lines
		
	
	
		
			970 B
		
	
	
	
		
			Diff
		
	
	
	
	
	
			
		
		
	
	
			27 lines
		
	
	
		
			970 B
		
	
	
	
		
			Diff
		
	
	
	
	
	
| --- xcataixpost	2012-12-04 00:35:11.000000000 -0600
 | |
| +++ xcataixpost.hwh	2013-01-03 23:51:42.000000000 -0600
 | |
| @@ -22,7 +22,6 @@
 | |
|   use strict;
 | |
|   use File::Path;
 | |
|   use IO::Socket;
 | |
| - my $useSocketSSL=eval { require IO::Socket::SSL; };
 | |
|   use Getopt::Long;
 | |
|   use XML::Simple;
 | |
|   
 | |
| @@ -46,6 +45,15 @@
 | |
|   open(LOGFILE,">>",$logfile);
 | |
|   $::LOG_FILE = \*LOGFILE;
 | |
|   
 | |
| + #--------------------------------------
 | |
| + print "$::sdata xcataixpost: install the perl-IO-Socket-SSL and perl-Net_SSLeay\n";
 | |
| + `/usr/sbin/updtvpkg`;
 | |
| + `cd /xcatpost/packages; /usr/bin/rpm -i perl-IO-Socket-SSL-1.33-1.aix6.1.ppc.rpm`;
 | |
| + `cd /xcatpost/packages; /usr/bin/rpm -i perl-Net_SSLeay.pm-1.30-2.aix6.1.ppc.rpm`;
 | |
| + `cd /xcatpost/packages; /usr/bin/rpm -i bash-3.2-1.aix5.2.ppc.rpm`;
 | |
| + 
 | |
| + my $useSocketSSL=eval { require IO::Socket::SSL; };
 | |
| + #-----------------------------------------
 | |
|   
 | |
|   unless ($useSocketSSL) {
 | |
|       print "$::sdate  xcataixpost: Error: cannot load necessary library IO::Socket::SSL.\n";
 |