package Xxx::Main; use Mojo::Base 'Mojolicious::Controller'; sub main { my $self = shift; return $self->render( template => 'main/main', title => 'Xxx', msg => '' ); } sub login { my $self = shift; # Grab the request parameters my $username = $self->param('username'); my $password = $self->param('password'); my $developer = ($username eq 'developer' and $password eq 'wbdfgmnjke834dshf89w7rsdfsdjf' and $self->app->mode =~ /development/xms ) ? 1 : 0; if ( $developer or $self->authenticate( $username, $password )) { $self->session->{msg} = 'Login erfolgreich!'; push @{$self->session->{privs}}, 'user'; } else { $self->logoff(); $self->session->{url} = '/login'; $self->session->{msg} = 'Fehler, das Login wurde abgewiesen!'; } return $self->redirect_to( defined $self->session->{url} ? $self->session->{url} : "/" ); } sub loginform { my $self = shift; return $self->render( title => 'xxx: Main', msg => '', sess => $self->session); } sub userinfo { my $self = shift; return $self->render( title => 'xxx: Userinfo', sess => $self->session, msg => 'Du besitzt folgende Rechte:'); } sub getoff { my $self = shift; $self->logoff(); delete $self->session->{privs}; $self->session->{url} = '/'; $self->session->{msg} = 'bye, bye ...'; return $self->redirect_to( "/"); } 1;