I'm new to Perl and to Template Toolkit, so please excuse me, but I really need some help.

I'm sending the request object in the handler, like 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( ))
[download]

And then, in the template, I do the following to access the request object:

[%RAWPERL%]my $request = $stash->get('request');[%END%]
[download]

I know it's working because I can get the parameters from the request object by doing this:

[%RAWPERL%]
my $request = $stash->get('request');
my $param1 = $request->param('param1');
$output .= $param1;
[%END%]
[download]

But I'm not sure if I'm doing this the right way, because I'm having some data inconsistency problems, and I'm trying to find out if the cause might be related to the way I'm accessing the request object.

I really would appreciate any help.