Select Code to Download

for ( $foo ) {
  s/frog/toad/g;
  s/man/boy/;
  s/woman/girl/;
}

for $_ ( $foo ) {
  $_ =~ s/frog/toad/g;
  $_ =~ s/man/boy/;
  $_ =~ s/woman/girl/;
}