Select Code to Download

####### foo.pl ######################
use Foo;
...
sub name { return $_[0]->{name}; }

1;

####### bar.pl ######################
use Bar;
...
sub age { return $_[0]->{age}; }

1;

foo.pl
Foo.pm
bar.pl
Bar.pm

####### foobar.pl ######################
use Foobar;
...
    name => 'Tom'
    age  => 23
);

foobar.pl
Foobar.pm
Foobar/Foo.pm
Foobar/Bar.pm

####### Foobar.pm ##################
package Foobar;
...
}

1;