Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
18 lines (12 sloc) 241 Bytes
use Template;
my $config = {
WRAPPER => 'wrapper.tt',
};
my $template = Template->new($config);
my $vars = {
title => {
mine => "",
}
};
my $input = 'q1.tt';
$template->process($input, $vars) || die $template->error();