<html>
<body>
% my ($x) = @_;
% my @tab = $x->{'table'};
%# my $max_index = $#tab;
%# for (my $i=0;$i<$max_index;$i++)
%# {
%= $tab[0][1][3]
%# }
</body>
</html>