use Template::Parser;

$parser   = Template::Parser->new(\%config);
$template = $parser->parse($text)
            || die $parser->error(), "\n";
[download]

Template compiles the template in the subroutine on line 1512 of Template::Provider.