view release on metacpan or  search on metacpan

lib/App/Aphra.pm  view on Meta::CPAN

}

sub serve {
  my $self = shift;

  require App::HTTPThis;
  if ($@) {
    croak "App::HTTPThis must be installed for 'serve' command";
  }

  local @ARGV = $self->config->{target};
  App::HTTPThis->new->run;
}

has ver => (
  is => 'ro',
  default => $VERSION,
);

sub version {
  my $me = path($0)->basename;