my @subdirs = grep -d, glob "D:\Temp\*";