Select Code to Download

package MyModule;

sub new { bless {}, shift }
sub foo { "do some foo stuff" }
1;

use MyModule;
my $o = new MyModule;

$o->foo();