Select Code to Download

#!/usr/bin/perl -l

...
my $g = Foo("Goodbye");
print &$h("Bar");
print &$g("Baz");