$string =~ s/%\$abc%/$abc/;