Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

Mashes up MooseX::Getopt and App::Cmd

This branch is 0 commits ahead and 0 commits behind master

Fetching latest commit…

Octocat-spinner-32-eaf2f5

Cannot retrieve the latest commit at this time

Octocat-spinner-32 lib
Octocat-spinner-32 t
Octocat-spinner-32 xt
Octocat-spinner-32 .gitattributes
Octocat-spinner-32 .gitignore
Octocat-spinner-32 .mailmap
Octocat-spinner-32 Changes
Octocat-spinner-32 MANIFEST.SKIP
Octocat-spinner-32 README.pod
Octocat-spinner-32 TODO
Octocat-spinner-32 dist.ini
Octocat-spinner-32 perlcritic.rc
Octocat-spinner-32 weaver.ini
README.pod

NAME

MooseX::App::Cmd - Mashes up MooseX::Getopt and App::Cmd

VERSION

version 0.27

SYNOPSIS

    package YourApp::Cmd;
    use Moose;

    extends qw(MooseX::App::Cmd);


    package YourApp::Cmd::Command::blort;
    use Moose;

    extends qw(MooseX::App::Cmd::Command);

    has blortex => (
        traits => [qw(Getopt)],
        isa => 'Bool',
        is  => 'rw',
        cmd_aliases   => 'X',
        documentation => 'use the blortext algorithm',
    );

    has recheck => (
        traits => [qw(Getopt)],
        isa => 'Bool',
        is  => 'rw',
        cmd_aliases => 'r',
        documentation => 'recheck all results',
    );

    sub execute {
        my ( $self, $opt, $args ) = @_;

        # you may ignore $opt, it's in the attributes anyway

        my $result = $self->blortex ? blortex() : blort();

        recheck($result) if $self->recheck;

        print $result;
    }

DESCRIPTION

This module marries App::Cmd with MooseX::Getopt.

Use it like App::Cmd advises (especially see App::Cmd::Tutorial), swapping App::Cmd::Command for MooseX::App::Cmd::Command.

Then you can write your moose commands as Moose classes, with MooseX::Getopt defining the options for you instead of opt_spec returning a Getopt::Long::Descriptive spec.

METHODS

BUILD

After calling new this method is automatically run, setting underlying App::Cmd attributes as per its documentation.

SEE ALSO

App::Cmd
App::Cmd::Tutorial
MooseX::Getopt
MooseX::App::Cmd::Command

SUPPORT

Perldoc

You can find documentation for this module with the perldoc command.

  perldoc MooseX::App::Cmd

Websites

The following websites have more information about this module, and may be of help to you. As always, in addition to those websites please use your favorite search engine to discover more resources.

Bugs / Feature Requests

Please report any bugs or feature requests through the web interface at https://github.com/mjgardner/moosex-app-cmd/issues. You will be automatically notified of any progress on the request by the system.

Source Code

The code is open to the world, and available for you to hack on. Please feel free to browse it and play with it, or whatever. If you want to contribute patches, please send me a diff or prod me to pull from your repository :)

https://github.com/mjgardner/moosex-app-cmd

  git clone git://github.com/mjgardner/moosex-app-cmd.git

AUTHORS

  • Yuval Kogman <nothingmuch@woobling.org>
  • Guillermo Roditi <groditi@cpan.org>
  • Daisuke Maki <dmaki@cpan.org>
  • Vladimir Timofeev <vovkasm@gmail.com>
  • Bruno Vecchi <brunov@cpan.org>
  • Offer Kaye <offerk@cpan.org>
  • Mark Gardner <mjgardner@cpan.org>
  • Yanick Champoux <yanick+cpan@babyl.dyndns.org>
  • Dann <techmemo@gmail.com>
  • Ken Crowell <oeuftete@gmail.com>
  • Michael Joyce <ubermichael@gmail.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Infinity Interactive, Yuval Kogman.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

Something went wrong with that request. Please try again.