my $count = $data =~ s/\b($search)\b/$bs$1$be/gi;