perl -w -e '$_="Hello there\n"; s/t/\322/; print $_; s/^.*?\322/yes/; print $_'
Hello ̉here
Hello ̉here