my @filesWanted = grep { -f && m{your regex} } readdir $dirHandle;