$foo = '$bar'; s/$foo/XYZ/g;