CPAN-Mirror-Tiny
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
lib/CPAN/Mirror/Tiny/CLI.pm view on Meta::CPAN
return $self->$sub(@{$self->{argv}});
} else {
warn "Unknown subcommand '$cmd', try `$0 --help`\n";
return;
}
}
sub parse_options {
my $self = shift;
local @ARGV = @_;
my $parser = Getopt::Long::Parser->new(
config => [qw(no_auto_abbrev no_ignore_case pass_through)],
);
$parser->getoptions(
"h|help" => sub { $self->cmd_help; exit },
"v|version" => sub { $self->cmd_version; exit },
"q|quiet" => \$self->{quiet},
"b|base=s" => \$self->{base},
"a|author=s" => \$self->{author},
) or return 0;
view all matches for this distributionview release on metacpan - search on metacpan
( run in 0.462 second using v1.00-cache-2.02-grep-82fe00e-cpan-da92000dfeb )