with 'Catalyst::ScriptRole';
-__PACKAGE__->meta->get_attribute('help')->cmd_aliases('h');
-
has force => (
traits => [qw(Getopt)],
cmd_aliases => 'nonew',
sub run {
my ($self) = @_;
- $self->_exit_with_usage if !$ARGV[0];
+ $self->_exit_with_usage if !$self->ARGV->[0];
my $helper_class = $self->helper_class;
Class::MOP::load_class($helper_class);