--- 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";