Template-toolkit cile test #1 [%PERL%] sub foo { my ($a, $b) = @_; my $c = LWP::UserAgent->new; $d = $c->request('GET', $a, $b); return $d->content; } my $d1 = foo('yob', 'bow'); [% END %] and more continues...