in reply to html::template loop seperator?

here's a basic way to control the separator that works, but can't really apply in my case. Does anyone know if there's any possible way to create separators from a single array?
etc :
@arrayResult = qw(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15);
then somewhere inside the loop, seperate @arrayResult after each 5th element and finally put into template.

test1.pl : 


        my $template = HTML::Template->new(filename => 'test1.html');
                        

        my @array1 = qw(1 2 3 4 5);
        my @array2 = qw(10 11 12 13 14 15);
                        
        my @outer; 
        for my $o (@array1){
        
          my @inner;
          for my $i (@array2){
          
            push(@inner, {INNERTEXT=>$i});
                
          }
          
          push(@outer, {
                            INNER=> \@inner,
                            TITLE=> "test drive"
                        });
                
        } 
             
        $template->param(OUTER => \@outer);
        
        print $template->output();

[download]


test1.html 


<html>
<body>
<table style="border:solid 1px black;">
<TMPL_LOOP NAME=OUTER> 
 <tr>
 <td> <TMPL_VAR NAME=TITLE> </td>
 <TMPL_LOOP NAME=INNER>
  <td>
  <TMPL_VAR NAME=INNERTEXT> 
  </td>
 </TMPL_LOOP>
 <td>-break </td>
 </tr>
</TMPL_LOOP>
</table>
</body>
<body>

[download]

In Section Seekers of Perl Wisdom