<%def .get_foo> <%init> my @array = qw(foo bar baz); return @array; <%def .display_foo> <% join( '', map "$_
", $m->comp( '.get_foo' ) ) %>

%for ($m->comp( '.get_foo' ) ) {
1. <% $_ %>
%}

<& .display_foo &>