Поиск пользователя
<%args> $url => 'index.html' $search => undef $search_by => undef <%init> my @fields; my @properties; my %props; my $class = $state->{users}->profile_document_class; my $object = $class->new ($keeper); if ( ref $object ) { @fields = $object->search_fields; @fields = qw( login email nickname name ) unless @fields; @properties = $object->structure(); %props = map { $_->{attr} => $_->{rusname} } @properties; } else { @fields = qw( login email nickname name ); %props = ( 'login' => { 'Логин' }, 'email' => { 'E-mail' }, 'nickname' => { 'Ник' }, 'name' => { 'Ф.И.О.' }, ); }