find2perl  . -type f -name '.*se\d\d\d\dab.*' -exec rm {} \;