while($_ =~ s/x\|xx\|x/x\|x x\|x/g){
                                        }