$r->get('/login')->to('MyApp#https_redirect');

##</code><code>##

sub https_redirect {
    my $self = shift;

    my $secure = $self->req->url->to_abs->scheme('https')->port(443);
    $self->redirect_to($secure);
}