The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

use Moose;
sub http_default($self, $c, $code, %args) {
$c->view('HTML::Errors::Default', status_code=>$code, %args)->respond($code);
}
sub http_404($self, $c, %args) {
$c->view('HTML::Errors::NotFound', %args)->respond(404);
}
sub http_403($self, $c, %args) {
$c->view('HTML::Errors::Forbidden', %args)->respond(403);
}
__PACKAGE__->meta->make_immutable;