Re: Showing global options while using App::Cmd

[tobyink]

Personally I avoid global_opt_spec and instead use a base class for all commands. Let's say my app is called MyApp, then I'll do it like this:

{
  package MyApp::Command; # abstract
  use strict;
  use App::Cmd::Setup-command;
  
  sub opt_spec {
    return (
      [ 'someopt'  => 'This is a global option' ],
    );
  }
  
  # you can also define any helper methods you like here
  # and all your commands will have easy access to them.
}

{
  package MyApp::Command::foo;
  use strict;
  use MyApp-command;
  
  sub opt_spec {
    my $self = shift;
    return (
      $self->SUPER::opt_spec(@_),
      [ 'otheropt'  => 'This is another option' ],
    );
  }
}