package Test::MyAny::Mouse::Command::foo;
use Mouse;
extends 'MouseX::App::Cmd::Command';
has bar => (
    isa           => 'Str',
    is            => 'ro',
    required      => 1,
    documentation => 'required option field',
);
sub execute {
    my ( $self, $opt, $arg ) = @_;
    die 'my Mouse bar is ', $self->bar . "\n";
}
1;