Arrays in Perl Preprocessing

[vignajethkk]

Hi,
I would like to know if it is possible to use perl arrays in pre-processor like the below example

addrmap test {

<% $FIELDS = "2"; %>
<% @FIELD_NAMES = ("ecc", "parity_err"); %>

regfile errors {

   field intr_field {
     hw = w;
     sw = rw;
     woclr;
     sticky;
     intr;
   };

   // Register
   reg {
       <% for( $i = 0; $i < $FIELDS; $i += 1 ) { %>
       intr_field a<%=$i%>;                                   // ----- WORKING
       intr_field <%=$FIELD_NAMES[<%=i%>]%>;                  // ----- NOT WORKING :(
       <% } %>
   } foo_reg;
};  

errors err;
} ;

[vignajethkk]

never mind, one can use foreach loop :)