Help for this page

Select Code to Download

Select or download this

sub cgiapp_init {
    my $self = shift;
...
    $self->{user} = $user;
    return 1;
}