$s = "x|xx|xx|xxxx|xx|xxx|xx|xx|x";
$s =~ s[(x\|x)(x\|x)([x\|]*)][$1 $2$3]g;
print $s;
x|x x|xx|xxxx|xx|xxx|xx|xx|x