package foo::bar;
use strict;
sub handle {
my $p = shift;
my $parameters = $p->{'parameters'}; # here are the parameters for either POST or GET
my $session = $p->{'session'}; # persistent session information via [kobe://Apache::Session]
my $dbh = $p->{'dbh'}; # database handle via [kobe://Apache::DBI]
# do some stuff
# do some more stuff
# what is returned from this is a hash reference that is the parameters to HTML::Template
my $return;
$return->{'some_template_var'} = $some_var;
return $return;
}
1;
####
##