Select Code to Download

#!c:/apache/perl/bin/perl.exe -wT

...
print $template->output;

MyAppCommon::bottomPublic($alias);

#!c:/apache/perl/bin/perl.exe -wT

...
print $template->output;

MyAppCommon::bottomPublic($alias, $userAccess, $membership);

my $sid = cookie('main') || undef;
my @sessionInfo;
...
if ( $session->is_new() ) {
    $session->delete();
}

&test;

...

    return 1;
}