$ENV{DENALI_ROOT}=rel2abs($ENV{DENALI_ROOT});
my @dirs=splitdir(canonpath($ENV{DENALI_ROOT});
print Dumper(@dirs);
#print $RealBin;