% foreach my $n ( @{ $data->{ names } || [] } ){

    % if($n->{'year'} eq <%= $number %> ) {
       <tr>
         <td> % name_val(<%= $n->{'name'} %>) % </td>
         <td><%= $n->{'age'} %></td>
         <td><%= $n->{'code'} %></td>
       </tr>
     % last;
  % }
% }