Help for this page

Select Code to Download


  1. or download this
    unless ($self->session->param('user_id'))
    {
        $self->prerun_mode('login');
    }
    
  2. or download this
    my $s = CGI::Session->load("driver:mysql", 
        undef, 
    ...
        });
    
    $app->redirect() if ($s->is_empty);
    
  3. or download this
    $s = $s->new;
    $s->param('user_id', $user->id);