... my @fileName = grep(/index/i, readdir D); ...