Select Code to Download

my $var = "foobarfoobaz";
$var =~ s/foo//;
say $var;   # says "barfoobaz"

my $var = "foobarfoobaz";
$var =~ s/foo//g;
say $var;   # says "barbaz"

my $var = "foobarfoobaz";
$var =~ s@foo@@g;
say $var;   # says "barbaz"

my $var = "foobarfoobaz";
$var =~ s{foo}{}g;
say $var;   # says "barbaz"