13 lines
183 B
Plaintext
13 lines
183 B
Plaintext
|
<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>
|