[% PERL %]
my $copy;
@{$copy} = $stash->get('array');
if (ref($copy) eq 'ARRAY') {
  $stash->set('copy', sort { $a->{'name'} cmp $b->{'name'} } @{$copy});
}
[% END %]
[% FOREACH element IN copy %]
[% element.name %]
[% END %]