diff --git a/perl-xCAT/xCAT/Client.pm b/perl-xCAT/xCAT/Client.pm
index bc3171fa5..c6966e978 100644
--- a/perl-xCAT/xCAT/Client.pm
+++ b/perl-xCAT/xCAT/Client.pm
@@ -14,6 +14,7 @@ if ($^O =~ /^aix/i) {
 }
 use IO::Handle;
 use MIME::Base64 qw(decode_base64);
+use IO::Socket::SSL;
 
 my $inet6support;
 if ($^O =~ /^aix/i) {  # disable AIX IPV6  TODO fix
diff --git a/xCAT-server/lib/xcat/plugins/docker.pm b/xCAT-server/lib/xcat/plugins/docker.pm
index 148f0c60d..00291f8a8 100755
--- a/xCAT-server/lib/xcat/plugins/docker.pm
+++ b/xCAT-server/lib/xcat/plugins/docker.pm
@@ -35,7 +35,6 @@ use xCAT::MsgUtils;
 use Cwd;
 use xCAT::Usage;
 use JSON;
-#use Data::Dumper;
 
 my $verbose;
 my $global_callback;
@@ -1003,7 +1002,7 @@ sub init_async {
     $async = HTTP::Async->new(
         slots => $args{slots},
         ssl_options => {
-            SSL_verify_mode => "SSL_VERIFY_PEER",
+            SSL_verify_mode => SSL_VERIFY_PEER,
             SSL_ca_file => $ssl_ca_file,
             SSL_cert_file => $ssl_cert_file,
             SSL_key_file => $key_file,