Select Code to Download

sub foo { print "foo: ", $_[0], "\n" }

...
foo: called with no &
foo: called via reference
foo: called via & and reference