perl -pi -e 's/(\S+)<\?Pub \_hardspace\?\>(\S+)/<xx\>$1 $2<\/xx\>/gs' test