$search contains backslashes that should not be interpreted as special characters. Use \Q to quote the special characters:

if (not $string =~ s/\Q$search/$replace/) {
[download]

Note that / can be used as the delimiter, since neither the pattern nor the replacement contain literal slashes.