given $foo {
  s/frog/toad/g;
  s/man/boy/;
  s/woman/girl;
}