perl -pi -e 's/<your pattern>/" " x (length($&))/eg' file