# Filter out all "hidden" files
my @array = grep !/^\./, readdir(DIR);