my @good_stuff = grep (/^\d{5,}$/, @stuff);