diff --git a/perl-xCAT/xCAT/Client.pm b/perl-xCAT/xCAT/Client.pm
index 2f8937b99..4814b65da 100644
--- a/perl-xCAT/xCAT/Client.pm
+++ b/perl-xCAT/xCAT/Client.pm
@@ -30,7 +30,7 @@ if ($inet6support) {
 unless ($inet6support) {
   eval { require Socket };
   eval { require IO::Socket::INET };
-  eval { require IO::Socket::SSL; IO::Socket::SSL->import() };
+  eval { require IO::Socket::SSL; IO::Socket::SSL->import('inet4') };
 }
 
 
diff --git a/xCAT-server/sbin/xcatd b/xCAT-server/sbin/xcatd
index 8b7571b68..3b4b02927 100755
--- a/xCAT-server/sbin/xcatd
+++ b/xCAT-server/sbin/xcatd
@@ -55,7 +55,7 @@ if ($inet6support) {
 unless ($inet6support) {
   eval { require Socket };
   eval { require IO::Socket::INET };
-  eval { require IO::Socket::SSL; IO::Socket::SSL->import(); };
+  eval { require IO::Socket::SSL; IO::Socket::SSL->import('inet4'); };
 }
 
 my $dispatch_requests = 1; # govern whether commands are dispatchable