|
NAMEMooseX::App - Write user-friendly command line apps with even less sufferingSYNOPSISIn your base class:package MyApp; use MooseX::App qw(Color); option 'global_option' => ( is => 'rw', isa => 'Bool', documentation => q[Enable this to do fancy stuff], ); # Global option has 'private' => ( is => 'rw', ); # not exposed Write multiple command classes (If you have only a single command class you should use MooseX::App::Simple instead). Packackes in the namespace may be deeply nested. package MyApp::SomeCommand; use MooseX::App::Command; # important (also imports Moose) extends qw(MyApp); # optional, only if you want to use global options from base class # Positional parameter parameter 'some_parameter' => ( is => 'rw', isa => 'Str', required => 1, documentation => q[Some parameter that you need to supply], ); option 'some_option' => ( is => 'rw', isa => 'Int', required => 1, documentation => q[Very important option!], ); # Option sub run { my ($self) = @_; # Do something } And then you need a simple wrapper script (called eg. myapp): #!/usr/bin/env perl use MyApp; MyApp->new_with_command->run; On the command line: bash$ myapp help usage: myapp <command> [long options...] myapp help global options: --global_option Enable this to do fancy stuff [Flag] --help --usage -? Prints this usage information. [Flag] available commands: some_command Description of some command another_command Description of another command help Prints this usage information or bash$ myapp some_command --help usage: myapp some_command <SOME_PARAMETER> [long options...] myapp help myapp some_command --help parameters: some_parameter Some parameter that you need to supply [Required] options: --global_option Enable this to do fancy stuff [Flag] --some_option Very important option! [Int,Required] --help --usage -? Prints this usage information. [Flag] DESCRIPTIONMooseX-App is a highly customisable helper to write user-friendly command line applications without having to worry about most of the annoying things usually involved. Just take any existing Moose class, add a single line ("use MooseX-App qw(PluginA PluginB ...);") and create one class for each command in an underlying namespace. Options and positional parameters can be defined as simple Moose accessors using the "option" and "parameter" keywords respectively.MooseX-App will then
Commandline options are defined using the 'option' keyword which accepts the same attributes as Moose' 'has' keyword. option 'some_option' => ( is => 'rw', isa => 'Str', ); This is equivalent to has 'some_option' => ( is => 'rw', isa => 'Str', traits => ['AppOption'], # Load extra metaclass cmd_type => 'option', # Set attribute type ); Single letter options are treated as flags and may be combined with each other. However such options must have a Boolean type constraint. option 'verbose' => ( is => 'rw', isa => 'Bool', cmd_flag => 'v', ); Positional parameters are defined with the 'parameter' keyword parameter 'some_option' => ( is => 'rw', isa => 'Str', ); This is equivalent to has 'some_option' => ( is => 'rw', isa => 'Str', traits => ['AppOption'], cmd_type => 'parameter', ); All keywords are imported by Moosex::App (in the app base class) and MooseX::App::Command (in the command class) or MooseX::App::Simple (single class application). Furthermore, all options and parameters can also be supplied via %ENV option 'some_option' => ( is => 'rw', isa => 'Str', cmd_env => 'SOME_OPTION', # sets the env key ); Moose type constraints help MooseX::App to construct helpful error messages and parse @ARGV in a meaningful way. The following type constraints are supported:
Read the Tutorial for getting started with a simple MooseX::App command line application. METHODSnew_with_commandmy $myapp_command = MyApp->new_with_command(); This constructor reads the command line arguments and tries to create a command class instance. If it fails it returns a MooseX::App::Message::Envelope object holding an error message. You can pass a hash of default/fallback params to new_with_command my $obj = MyApp->new_with_command(%default); Optionally you can pass a custom ARGV to this constructor my $obj = MyApp->new_with_command( ARGV => \@myARGV ); However, if you do so you must take care of propper @ARGV encoding yourself. initialize_command_classmy $obj = MyApp->initialize_command_class($command_name,%default); Helper method to instantiate the command class for the given command. GLOBAL OPTIONSThese options may be used to alter the default behaviour of MooseX-App.app_baseapp_base 'my_script'; # Defaults to $0 Usually MooseX::App will take the name of the calling wrapper script to construct the program name in various help messages. This name can be changed via the app_base function. app_fuzzyapp_fuzzy 1; # default OR app_fuzzy 0; Enables fuzzy matching of commands and attributes. Is turned on by default. app_strictapp_strict 0; # default OR app_strict 1; If strict is enabled the program will terminate with an error message if superfluous/unknown positional parameters are supplied. If disabled all extra parameters will be copied to the extra_argv attribute. Unknown options (with leading dashes) will always yield an error message. The command_strict config in the command classes allows one to set this option individually for each command in the respective command class. app_prefer_commandlineapp_prefer_commandline 0; # default or app_prefer_commandline 1; Specifies if parameters/options supplied via @ARGV,%ENV should take precedence over arguments passed directly to new_with_command. app_namespaceapp_namespace 'MyApp::Commands', 'YourApp::MoreCommands'; OR app_namespace(); Usually MooseX::App will take the package name of the base class as the namespace for commands. This namespace can be changed and you can add multiple extra namespaces. If app_namespace is called with no arguments then autoloading of command classes will be disabled entirely. app_excludeapp_exclude 'MyApp::Commands::Roles','MyApp::Commands::Utils'; A sub namespace included via app_namespace (or the default behaviour) can be excluded using app_exclude. app_command_nameapp_command_name { my ($package_short,$package_full) = @_; # munge package name; return $command_name; }; This coderef can be used to control how autoloaded package names should be translated to command names. If this command returns nothing the respective command class will be skipped and not loaded. app_command_registerapp_command_register do => 'MyApp::Commands::DoSomething', undo => 'MyApp::Commands::UndoSomething'; This keyword can be used to register additional commands. Especially useful in conjunction with app_namespace and disabled autoloading. app_descriptionapp_description qq[Description text]; Set the app description text. If not set this information will be taken from the Pod DESCRIPTION or OVERVIEW sections. (see command_description to set usage per command) app_usageapp_usage qq[myapp --option ...]; Set a custom usage text. If not set this will be taken from the Pod SYNOPSIS or USAGE section. If both sections are not available, the usage information will be autogenerated. (see command_usage to set usage per command) app_permuteapp_permute 0; # default OR app_permute 1; Allows one to specify multiple values with one key. So instead of writing "--list element1 --list element2 --list element3" one might write "--list element1 element2 element3" for ArrayRef elements. HashRef elements may be expressed as "--hash key=value key2=value2". GLOBAL ATTRIBUTESAll MooseX::App classes will have two extra attributesextra_argvCarries all parameters from @ARGV that were not consumed (only if app_strict is turned off, otherwise superfluous parameters will raise an exception).help_flagHelp flag that is set when help was requested.ATTRIBUTE OPTIONSOptions and parameters accept extra attributes for customisation:
Refer to MooseX::App::Meta::Role::Attribute::Option for detailed documentation. METADATAMooseX::App will use your class metadata and POD to construct the commands and helpful error- or usage-messages. These bits of information are utilised and should be provided if possible:
PLUGINSThe behaviour of MooseX-App can be customised with plugins. To load a plugin just pass a list of plugin names after the "use MooseX-App" statement. (Attention: order sometimes matters)use MooseX::App qw(PluginA PluginB); Currently the following plugins are shipped with MooseX::App
Refer to Writing MooseX-App Plugins for documentation on how to create your own plugins. DEVELOPMENTMake sure to invoke your script with APP_DEVELOPER=1 ser during development. This will come with a starup penalty but perform additional checks for detecting wrong attribute/type constraint combinations, name clashes, ...CAVEATS & KNOWN BUGSStartup time may be an issue - escpecially if you load many plugins. If you do not require the functionality of plugins and ability for fine grained customisation (or Moose for that matter) then you should probably use MooX::Options or MooX::Cmd.In some cases - especially when using non-standard class inheritance - you may end up with command classes lacking the help attribute. In this case you need to include the following line in your base class or command classes. with qw(MooseX::App::Role::Common); When manually registering command classes (eg. via app_command_register) in multiple base classes with different sets of plugins (why would you ever want to do that?), then meta attributes may lack some attribute metaclasses. In this case you need to load the missing attribute traits explicitly: option 'argument' => ( depends => 'otherargument', trait => ['MooseX::App::Plugin::Depends::Meta::Attribute'], # load trait ); SEE ALSORead the Tutorial for getting started with a simple MooseX::App command line application.For alternatives you can check out MooseX::App::Cmd, MooseX::Getopt, MooX::Options, MooX::Cmd and App::Cmd SUPPORTPlease report any bugs or feature requests via <https://github.com/maros/MooseX-App/issues/new>. I will be notified, and then you'll automatically be notified of progress on your report as I make changes.AUTHORMaroš Kollár CPAN ID: MAROS maros [at] k-1.com http://www.k-1.com CONTRIBUTORSSpecial thanks to all contributors.In no particular order: Andrew Jones, George Hartzell, Steve Nolte, Michael G, Thomas Klausner, Yanick Champoux, Edward Baudrez, David Golden, J.R. Mash, Thilo Fester, Gregor Herrmann, Sergey Romanov, Sawyer X, Roman F., Hunter McMillen, Maik Hentsche, Alexander Stoddard, Marc Logghe, Tina Müller, Lisa Hare, Jose Luis Martinez, Frank Schreiner You are more than welcome to contribute to MooseX-App. Please have a look at the <https://github.com/maros/MooseX-App/issues?q=is%3Aissue+is%3Aopen+label%3AWishlist> list of open wishlist issues for ideas. COPYRIGHTMooseX::App is Copyright (c) 2012-21 Maroš Kollár.This library is free software and may be distributed under the same terms as perl itself. The full text of the licence can be found in the LICENCE file included with this module.
Visit the GSP FreeBSD Man Page Interface. |