moosex::app::cmd(3pm) [debian man page]

MooseX::App::Cmd(3pm)					User Contributed Perl Documentation				     MooseX::App::Cmd(3pm)

NAME

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

SYNOPSIS

       See "SYNOPSIS" in App::Cmd.

	   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.

AUTHOR

       Yuval Kogman <nothingmuch@woobling.org>

       With contributions from:

       Guillermo Roditi <groditi@cpan.org>

COPYRIGHT

	   Copyright (c) 2007-2008 Infinity Interactive, Yuval Kogman. All rights
	   reserved This program is free software; you can redistribute it and/or
	   modify it under the same terms as Perl itself.

perl v5.14.2							    2012-02-29						     MooseX::App::Cmd(3pm)

App::Cmd::Command::help(3pm)				User Contributed Perl Documentation			      App::Cmd::Command::help(3pm)

NAME

       App::Cmd::Command::help - display a command's help screen

VERSION

       version 0.318

DESCRIPTION

       This command plugin implements a "help" command.  This command will either list all of an App::Cmd's commands and their abstracts, or
       display the usage screen for a subcommand with its description.

USAGE

       The help text is generated from three sources:

       o   The "usage_desc" method

       o   The "description" method

       o   The "opt_spec" data structure

       The "usage_desc" method provides the opening usage line, following the specification described in Getopt::Long::Descriptive.  In some
       cases, the default "usage_desc" in App::Cmd::Command may be sufficient and you will only need to override it to provide additional command
       line usage information.

       The "opt_spec" data structure is used with Getopt::Long::Descriptive to generate the description of the optons.

       Subcommand classes should override the "discription" method to provide additional information that is prepended before the option
       descriptions.

       For example, consider the following subcommand module:

	 package YourApp::Command::initialize;

	 # This is the default from App::Cmd::Command
	 sub usage_desc {
	   my ($self) = @_;
	   my $desc = $self->SUPER::usage_desc; # "%c COMMAND %o"
	   return "$desc [DIRECTORY]";
	 }

	 sub description {
	   return "The initialize command prepares the application...";
	 }

	 sub opt_spec {
	   return (
	     [ "skip-refs|R",  "skip reference checks during init", ],
	     [ "values|v=s@",  "starting values", { default => [ 0, 1, 3 ] } ],
	   );
	 }

	 ...

       That module would generate help output like this:

	 $ yourapp help initialize
	 yourapp initialize [-Rv] [long options...] [DIRECTORY]

	 The initialize command prepares the application...

	       --help		 This usage screen
	       -R --skip-refs	 skip reference checks during init
	       -v --values	 starting values

AUTHOR

       Ricardo Signes <rjbs@cpan.org>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2012 by Ricardo Signes.

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

perl v5.14.2							    2012-05-05					      App::Cmd::Command::help(3pm)