in reply to Untainting known good data

And without resorting to Inline C... 
use Inline C => qw(void I_TRUST_THIS(SV* a){SvTAINTED_off(a);});
...
I_TRUST_THIS($tmpl);

[download]


T I M T O W T D I

In Section Seekers of Perl Wisdom