Help for this page

Select Code to Download


  1. or download this
    my $r = shift;
my $request = Apache2::Request->new($r);
my %vars = (request => $request,...); 
$TT->process($file_path, \%vars, $r) || return error($r,$TT->error( ))
  2. or download this
    [%RAWPERL%]my $request = $stash->get('request');[%END%]
  3. or download this
    [%RAWPERL%]
my $request = $stash->get('request');
my $param1 = $request->param('param1');
$output .= $param1;
[%END%]