$string =~ s/find /replace/g;
$string =~ s/find /replace/gs;