initialize the variable XCATROOT when loading the .pm file

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@12082 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd

xCAT-server/lib/perl/xCAT/Template.pm

@@ -9,6 +9,14 @@ use File::Path;
 #use Data::Dumper;
 use Sys::Syslog;
 use xCAT::ADUtils; #to allow setting of one-time machine passwords
+
+BEGIN
+{
+      $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
+}
+
+
+
 my $netdnssupport = eval {
     require Net::DNS;
     1;