Login-Question

sub startup {
    my $mojo = shift;
    my $r = $mojo->routes;

    $mojo->secret('m7ucxtbswubgzstrbzju');

    my $auth = $r->bridge->to(
	cb => sub {
	    if (0) { # 'authenticated'
		return 1;
	    } else {
		return 0;
	    };
	});

    $auth->route('/')->to(cb => sub { shift->redirect_to('/profile')});
    $auth->route('/login')->to(cb => sub {shift->render_text('Log in: ...')});
    $auth->route('/profile')->to(cb => sub {shift->render_text('Your profile page!')});

    $r->route->to(cb => sub { shift->render_text('You have to log in!')});
};