with 'Catalyst::ScriptRole';
+has '+help' => (cmd_aliases => 'h');
+
__PACKAGE__->meta->make_immutable;
=head1 NAME
with 'Catalyst::ScriptRole';
+has '+help' => (cmd_aliases => 'h');
+
has force => (
traits => [qw(Getopt)],
cmd_aliases => 'nonew',
with 'Catalyst::ScriptRole';
+has '+help' => (cmd_aliases => 'h');
+
has listen => (
traits => [qw(Getopt)],
cmd_aliases => 'l',
with 'Catalyst::ScriptRole';
+has '+help' => (cmd_aliases => 'h');
+
sub run {
my $self = shift;
has help => (
traits => ['Getopt'],
- cmd_aliases => 'h',
isa => Bool,
is => 'ro',
documentation => q{Display this help and exit},