my ($find, $replace) = @_;
    my $content =~ s{$find}{$replace}s;