The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!perl -w
use strict;
use Test::More;

use Text::Xslate;

my $tt = Text::Xslate->new(
    syntax => 'TTerse',
    cache  => 0,
);

is $tt->render_string(<<'T'), "- 42\n";
%% foreach x in [42]
- [% x %]
%% end
T

is $tt->render_string(<<'T'), "- 42\n";
%% foreach in in [42]
- [% in %]
%% end
T

done_testing;