1 while s/(\S)\?(\S)/$1'$2/;