#!/usr/bin/perl
use warnings;
use strict;

use Template;

my @arr = (
           { name => 'Foo', value => 1 },
           # { name => 'Bar', value => 2 },
          );

'Template'->new
    ->process(\'TEST: [% FOREACH element IN arr.sort("name") %] [% element.name %][% END %]',
              { arr => \@arr });

##</code><code>##

TEST: Foo