print "CWD:$cwd";
   my $path_data = $cwd."\\data";//Also want to make the concat in-casesensitive
   chdir($path_data) or die "Cant chdir to $path_data $!";
   print "\nCWD:$cwd"; //same directory as above gets printed