Хотите сделать выделенные поля в Perl

Question

Я хочу сделать выбранные поля на основе значений из базы данных.

код:

my $bug_id = $cgi->param('id');

#query for fetching the datas from the table category_bug_map for updating the select box
my $selectboxcategoryQuery = "SELECT os,cp,service FROM category_bug_map WHERE     bug_id=$bug_id";


my $statusQuery2 = $dbslave -> prepare($selectboxcategoryQuery);
$statusQuery2 -> execute();
my($OS,$CP,$ser) = $statusQuery2 -> fetchrow_array();

$vars->{'select_os'} = $OS;
$vars->{'select_cp'} = $CP;
$vars->{'select_ser'} = $ser;

Я хочу использовать переменные в файле шаблона, чтобы сделать выбранные поля выбранными (обновленными). Как я могу это сделать?

Answer 1

Дженифер попробуй это: -

[% FOREACH категория IN sub_category1 %] [% категория%] [% END %]