perl substitution

Hello all

I have a strings like
" Watch news 24x7 "."x-wars is glowing"
" Watch news like 24 x 7"."x-mas will be celebrated"
" Dimensions of box is 24x23x47 ".

I have to remove the x(by) in between the number. If i just replace x, it will also remove all x's from text which i do not want. patterns are like 24x7 with no space in between and 24 x 7 with a space in between.
How can i remove these x's.
Please reply

perl -ne ' s/([ 0-9]+)x([ 0-9]+)/\1 \2/g;s/([ 0-9]+)x([ 0-9]+)/\1 \2/g; print ' file