use Pod::Usage;
use Moose;
use Catalyst::Restarter;
-#use Catalyst::Engine::HTTP;
use namespace::autoclean;
with 'MooseX::Getopt';
}
-my @argv = @ARGV;
sub run {
- my $self = shift;
+ my ($self) = shift;
$self->usage if $self->help;
my $restarter = $subclass->new(
%args,
start_sub => sub { $self->_run },
- argv => $self->ARGV,
+ argv => \$self->ARGV,
);
$restarter->run_and_watch;