for i in *; do perl -pi.backup -e's/such/ersetz/' "$i"; done