perl -r -pi -e 's/this/that/' *