http://www.perlmonks.org?node_id=474165


in reply to Template Toolkit, problem with recursive wrapper templates

That's a real bummer. Especially since WRAPPER classes are by their nature likely to be used more than once in a single call stack.

If I were you, I'd consider hacking the Template Toolkit modules themselves so that they don't do this check for WRAPPER directives, and sending a patch to the TT list for discussion.

$h=$ENV{HOME};my@q=split/\n\n/,`cat $h/.quotes`;$s="$h/." ."signature";$t=`cat $s`;print$t,"\n",$q[rand($#q)],"\n";