}
use Moose;
+use MooseX::Types::Common::Numeric qw/PositiveInt/;
use MooseX::Types::Moose qw/ArrayRef Str Bool Int RegexpRef/;
use namespace::autoclean;
has port => (
traits => [qw(Getopt)],
cmd_aliases => 'p',
- isa => Int,
+ isa => PositiveInt,
is => 'ro',
default => 3000,
documentation => 'Specify a different listening port (to the default port 3000)',