view release on metacpan or  search on metacpan

lib/Games/ABC_Path/Solver/App.pm  view on Meta::CPAN

    $self->_argv([@{$args->{argv}}]);

    return;
}

sub run
{
    my $self = shift;

    local @ARGV = @{$self->_argv};

    my $man = 0;
    my $help = 0;
    my $gen_template = 0;
    GetOptions(
        'help|h' => \$help,
        man => \$man,
        'gen-v1-template' => \$gen_template,
    )
        or pod2usage(2);