diff --git a/xCAT-server-2.0/share/xcat/cons/hmc b/xCAT-server-2.0/share/xcat/cons/hmc
index 389451341..a93a9c875 100644
--- a/xCAT-server-2.0/share/xcat/cons/hmc
+++ b/xCAT-server-2.0/share/xcat/cons/hmc
@@ -1,6 +1,10 @@
 #!/usr/bin/env perl
 # IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
-
+BEGIN
+{
+    $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
+}
+use lib "$::XCATROOT/lib/perl";
 use strict;
 use Getopt::Long;
 use xCAT::Table;