$_ = '123 4(5)67 89'; s/(?=[() ])/\\/g; print;