Привет!
Вот, есть кусок кода на perl

Код

my @vars = ();     my $templ = Template->new( {INCLUDE_PATH => '/var/www/html/tickets'});     my $sth = $dbh->prepare("SELECT * FROM tickets");     $sth->execute || print("operation failed");     while (my @result = $sth->fetchrow_array()) {         push(@vars,@result);     }     #print @vars;      my %tmp = ( tickets => @vars );     $templ->process('template.html',\%tmp);     $sth->finish;

и собственно сам шаблон,

Код

<html> <body> <table> [% FOREACH ticket = tickets %] <tr><td>[% ticket %]</td></tr> [% END %] </table> </body> </html>

Вопрос, в шаблон передаётся ссылка на хеш, как я понял... но мне нужно работать в этом шаблоне с массивом значений, которые берутся из БД, то есть с записями. Как это реализовать, допустим я хочу вывести несколько записей, причем не все столбцы, а допустим id,название.
Вверху код, я пытался что-то сам сделать, но неудачно.
Вопрос номер два, можно ли использовать вложенные циклы в Template Toolkit

На форуме ничего подобного не нашёл, если это присутствует укажите ссылку =).
Заранее благодарен...

Так, вроде сам разобрался

Код

my @vars = ();     my $templ = Template->new( {INCLUDE_PATH => '/var/www/html/tickets'});     my $sth = $dbh->prepare("SELECT * FROM tickets");     $sth->execute || print("operation failed");     while (my @result = $sth->fetchrow_array()) {             push(@vars,@result);     }     my %tmp = ( tickets => \@vars );     $templ->process('template.html',\%tmp);     $sth->finish;

Код

<html> <body> <table border="1"> [% FOREACH ticket = tickets %] <tr><td>[% ticket %]</td></tr> [% END %] </table> </body> </html>