diff --git a/xCAT-client/bin/getxcatdocs b/xCAT-client/bin/getxcatdocs
index 78b6f0265..4928e83b6 100755
--- a/xCAT-client/bin/getxcatdocs
+++ b/xCAT-client/bin/getxcatdocs
@@ -14,7 +14,7 @@ use strict;
 #use lib "$::XCATROOT/lib/perl";
 #use xCAT::Utils;
 use Getopt::Long;
-use Data::Dumper;
+#use Data::Dumper;
 
 #my $VERSION;
 my $HELP;
diff --git a/xCAT-client/bin/pping b/xCAT-client/bin/pping
index 0a96e9a41..6afdc2337 100755
--- a/xCAT-client/bin/pping
+++ b/xCAT-client/bin/pping
@@ -16,7 +16,7 @@ use POSIX qw(:signal_h :errno_h :sys_wait_h);
 use IO::Socket::SSL;
 use XML::Simple;
 $XML::Simple::PREFERRED_PARSER='XML::Parser';
-use Data::Dumper;
+#use Data::Dumper;
 use IO::Handle;
 use IO::Select;
 use Getopt::Long;
diff --git a/xCAT-client/bin/ppping b/xCAT-client/bin/ppping
index fcc844cfc..37e7c9045 100755
--- a/xCAT-client/bin/ppping
+++ b/xCAT-client/bin/ppping
@@ -24,7 +24,7 @@ use XML::Simple;
 if ($^O =~ /^linux/i) {
   $XML::Simple::PREFERRED_PARSER='XML::Parser';
 }
-use Data::Dumper;
+#use Data::Dumper;
 use IO::Handle;
 use IO::Select;
 use Getopt::Long;
diff --git a/xCAT-client/bin/prsync b/xCAT-client/bin/prsync
index 39bba9484..1145fad9c 100755
--- a/xCAT-client/bin/prsync
+++ b/xCAT-client/bin/prsync
@@ -8,7 +8,7 @@ use lib "$::XCATROOT/lib/perl";
 use IO::Socket::SSL;
 use XML::Simple;
 $XML::Simple::PREFERRED_PARSER='XML::Parser';
-use Data::Dumper;
+#use Data::Dumper;
 use IO::Handle;
 use IO::Select;
 use xCAT::Utils;
diff --git a/xCAT-client/bin/pscp b/xCAT-client/bin/pscp
index c572d4c34..a79a73330 100755
--- a/xCAT-client/bin/pscp
+++ b/xCAT-client/bin/pscp
@@ -8,7 +8,7 @@ use lib "$::XCATROOT/lib/perl";
 use IO::Socket::SSL;
 use XML::Simple;
 $XML::Simple::PREFERRED_PARSER='XML::Parser';
-use Data::Dumper;
+#use Data::Dumper;
 use IO::Handle;
 use IO::Select;
 use Thread qw(yield);
diff --git a/xCAT-client/bin/psh b/xCAT-client/bin/psh
index d6c171b3d..6aac43e8f 100755
--- a/xCAT-client/bin/psh
+++ b/xCAT-client/bin/psh
@@ -9,7 +9,7 @@ use lib "$::XCATROOT/lib/perl";
 use IO::Socket::SSL;
 use XML::Simple;
 $XML::Simple::PREFERRED_PARSER='XML::Parser';
-use Data::Dumper;
+#use Data::Dumper;
 use IO::Handle;
 use IO::Select;
 use xCAT::Utils;
diff --git a/xCAT-client/bin/wcons b/xCAT-client/bin/wcons
index 99cae72ce..7da1146f2 100755
--- a/xCAT-client/bin/wcons
+++ b/xCAT-client/bin/wcons
@@ -2,7 +2,7 @@
 #A placeholder wcons, a fuller port from 1.3 is needed
 use Getopt::Long qw(:config getopt_compat pass_through);
 use File::Basename;
-use Data::Dumper;
+#use Data::Dumper;
 use strict;
 unless ($ENV{DISPLAY}) {
 	print '$DISPLAY  not set';
diff --git a/xCAT-client/bin/wvid b/xCAT-client/bin/wvid
index 45ca8b9fb..cbffb04a4 100755
--- a/xCAT-client/bin/wvid
+++ b/xCAT-client/bin/wvid
@@ -12,9 +12,8 @@ unless ($xcatroot) {
     $xcatroot = "/opt/xcat"
 }
 use File::Basename;
-#use Data::Dumper;
 use xCAT::Client;
-use Data::Dumper;
+#use Data::Dumper;
 sub process_response {
     my $resp = shift;
     foreach my $rst (\@{$resp->{node}}) {
diff --git a/xCAT-client/bin/xCATWorld b/xCAT-client/bin/xCATWorld
index dc8bee44a..c5dccad18 100644
--- a/xCAT-client/bin/xCATWorld
+++ b/xCAT-client/bin/xCATWorld
@@ -8,7 +8,7 @@ use lib "$::XCATROOT/lib/perl";
 use IO::Socket::SSL;
 use IO::Socket::INET;
 use File::Basename;
-use Data::Dumper;
+#use Data::Dumper;
 use Getopt::Long;
 use xCAT::MsgUtils;
 use xCAT::Client submit_request;
diff --git a/xCAT-client/bin/xcoll b/xCAT-client/bin/xcoll
index f1cb27cb9..70b9f2922 100755
--- a/xCAT-client/bin/xcoll
+++ b/xCAT-client/bin/xcoll
@@ -2,7 +2,7 @@
 # IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
 BEGIN { $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : -d '/opt/xcat' ? '/opt/xcat' : '/usr'; }
 use lib "$::XCATROOT/lib/perl";
-use Data::Dumper;
+#use Data::Dumper;
 use xCAT::Client;
 use Getopt::Long;
 use strict;
diff --git a/xCAT-client/bin/xcsv b/xCAT-client/bin/xcsv
index 3fd5c0e33..d8d0f01b6 100755
--- a/xCAT-client/bin/xcsv
+++ b/xCAT-client/bin/xcsv
@@ -2,7 +2,7 @@
 # IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
 BEGIN { $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : -d '/opt/xcat' ? '/opt/xcat' : '/usr'; }
 use lib "$::XCATROOT/lib/perl";
-use Data::Dumper;
+#use Data::Dumper;
 use xCAT::Client;
 my %columns;
 use strict;