I think the OP wanted simplification, not just removal of $foo. I offer:

$_ = $foo;
s/frog/toad/g;
s/man/boy/;
s/woman/girl/;
[download]

One could then assign $_ back to $foo or use $_ directly as in print;

--traveler