@SubDirs = split(/\\/, $PathOnly);