1 while $target_data =~ s/$pattern/' ' x length $1/ge;