:
#### use HTML::Template; my $table = [ { row => [ { name => a11, picture => aaa }, { name => a12, picture => aaa }, { name => a13, picture => aaa }, ] }, { row => [ { name => a21, picture => aaa }, { name => a22, picture => aaa }, { name => a23, picture => aaa }, ] }, { row => [ { name => a31, picture => aaa }, { name => a32, picture => aaa }, { name => a33, picture => aaa }, ] }, ]; my $t = HTML::Template->new(filename => 'aa.tmpl'); $t->param(TABLE => $table); print $t->output;