$data =~ s/\Q$attempt1\E/$newstr/