Select Code to Download

BEGIN { print "$_ => $Foo::{$_}\n" foreach keys %Foo::; }

package Foo::Bar;
our @ISA = 'Foo';