html::template的一些问题

tmpl_loop用来输出tmpl_var的一个循环，可以用于html里的option等，

但是要用perl写tmpl_loop里面的循环，应该怎么写，就是值是不确定有多少个的！

应该怎么递增的去写呢?

看文档。
perldoc HTML::Template
很详细。

i got it! thax!


   # a couple of arrays of data to put in a loop:
   my @words = qw(I Am Cool);
   my @numbers = qw(1 2 3);

   my @loop_data = ();  # initialize an array to hold your loop

   while (@words and @numbers) {
     my %row_data;  # get a fresh hash for the row data

     # fill in this row
     $row_data{WORD} = shift @words;
     $row_data{NUMBER} = shift @numbers;

     # the crucial step - push a reference to this row into the loop!
     push(@loop_data, \%row_data);
   }

   # finally, assign the loop data to the loop param, again with a
   # reference:
   $template->param(THIS_LOOP => \@loop_data);