В приложении Mojolicious::Lite у меня есть маршрут, по которому я хочу убить сервер и перенаправить на другой сайт. Вот фрагмент.
my $me = $$;
get '/kill' => sub {
my $self = shift;
$self->res->code(301);
$self->redirect_to('http://www.google.com');
$self->app->log->debug("Goodbye, $name.");
# I need this function to return so I delay the kill a little.
system("(sleep 1; kill $me)&");
};
Этот код делает то, что я хочу, но он не кажется правильным. Я пробовал $self->app->stop, но это недоступно.
Есть ли правильный метод, который я должен использовать для доступа к серверу?
Ники