|
89
|
0 |
1 |
unless &GetOptions('class=s', \$config{'class'}, 'plugin=s', $config{'plugins'}, 'dir=s', \$config{'dir'}, 'distro=s', \$config{'distro'}, 'module=s', $config{'modules'}, 'builder=s', $config{'builder'}, 'eumm', sub {
push @{$config{'builder'};}, 'ExtUtils::MakeMaker';
}
, 'mb', sub {
push @{$config{'builder'};}, 'Module::Build';
}
, 'mi', sub {
push @{$config{'builder'};}, 'Module::Install';
}
, 'author=s', \$config{'author'}, 'email=s', \$config{'email'}, 'license=s', \$config{'license'}, 'force', \$config{'force'}, 'verbose', \$config{'verbose'}, 'version', sub {
require Dist::Man;
print "pl-dist-man v$Dist::Man::VERSION\n";
exit 1;
}
, 'help', sub {
pod2usage(1);
}
) |