Select Code to Download

sub startup {
    my $self = shift;
...
    my $auth = $r->under( sub { return defined($self->session('userid'
+)) } );
    $auth->get('/:layout/menu')->to('login#menu');
    $r->any('/:layout/:dummy')->to('login#nolog');}

Wed Nov 25 10:03:48 2015] [debug] GET "/upsmichel/nolog".
...
[Wed Nov 25 10:04:02 2015] [debug] GET "/upsmichel/menu".
[Wed Nov 25 10:04:02 2015] [debug] Routing to a callback.
[Wed Nov 25 10:04:02 2015] [debug] Nothing has been rendered, expectin
+g delayed response.