[% PERL %]
$stash->get('list')->pop;
#or maybe
#pop @{$stash->get('list')};
[% END %]