sub list : Path('/user/list') {
    my ($self, $c) = @_;

    my $data = $c->model('PBDB')->table('PbUser')
                 ->search( {'order_by' => 'id ASC'} );
    
    my %data = ( template     => 'user/list.tmpl',
                 title        => 'Benutzerliste',

                 navigationfile   => 'sub_naviagtion_user.tmpl',
                 username         => 'XXXXXX',
                 show_images      => 1,
                 userlist => $data,
            );

    while (my ($k, $v) = each %data) { $c->stash->{$k} = $v }

} # list