use ExtUtils::ModuleMaker;
 
Generate_Module_Files (
             NAME     => 'Sample::Module::Foo',
             ABSTRACT => 'a sample module',
             AUTHOR   => {NAME    => 'A. U. Thor',
                          EMAIL   => 'a.u.thor@a.galaxy.far.far.away',
                          CPANID  => 'AUTHOR',
                          WEBSITE => 'http://a.galaxy.far.far.away/modules',
                                   },
             VERSION  => 0.01,
             LICENSE  => 'perl',
             EXTRA_MODULES=> [
                              {
                               NAME     => 'Sample::Module::Bar',
                               ABSTRACT => 'a second module',
                              },
                              {
                               NAME     => 'Sample::Baz',
                               ABSTRACT => 'a third module',
                              },
                             ],
);


##</code><code>##

my $root = 'Foo::Bar::';
my @extras;
my @leaves = qw|Baz Plugh Xyzzy|;
foreach (@leaves) {
   push @extras, {
                  NAME     => $root . $_,
                  ABSTRACT => "$_ module",
                 };
}