$source = "abc";
$find = "a";
$replace = "x";
$source =~ s/$find/$replace/g;
print $source;

##</code><code>##

s/$find/$replace/g;

##</code><code>##

s/$find/$replace/gi;