Редактирование существующих профилей % for my $tab_id (keys(%{ $toopi })) % { % my $tab = $toopi->{$tab_id}; <% $tab->{name} %> (<% $tab->{id} %>)
% }
<%init> use vars qw($keeper $request); my $toopi = $project->tabs(); return undef if ( (! ref($toopi)) || (scalar(keys(%{ $toopi })) <= 0) );