Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Общие вопросы > Role Catalyst MySQL

Автор: gcc 14.8.2009, 07:41

есть роли, данные в MySQL, эти роли надо все время проверять

не могу понять, если написать так:

Код


$c->check_user_roles('moder_se');
$c->check_user_roles('moder_se');
$c->check_user_roles('moder_se');
$c->check_user_roles('moder_se');

но это будет 5 запросов (внутренних)?

в отладке пишет:

Код


[debug] Role denied: moder_se
[debug] Role denied: moder_se
[debug] Role denied: moder_se
[debug] Role denied: moder_se
[debug] Role denied: moder_se

то есть лучше написать $m = $c->check_user_roles('moder_se'); ??

или можно написать все вермя $c->check_user_roles('moder_se'); ??

Код



$c->user->{user}->{id}
$c->user->{user}->{id}
$c->user->{user}->{id}
$c->user->{user}->{id}
$c->user->{user}->{id}

это тоже будет 5 запросов (внутренних)? или 1?

хотел спросить, просто я уже написал, но не понял как правильнее....

Автор: gcc 18.9.2009, 04:48

опять хотел посмотреть исходники там и не нашел... http://cpansearch.perl.org/src/BRICAS/Catalyst-Plugin-Authorization-Roles-0.07/lib/Catalyst/Plugin/Authorization/Roles.pm ee /usr/local/lib/perl5/site_perl/5.8.9/Catalyst/Authentication/User.pm

Код


if $c->check_user_roles('moder_se');
if $c->check_user_roles('moder_se');
if $c->check_user_roles('moder_se');

это будет 3 запроса SQL?

а так 1?

Код


my $m = $c->check_user_roles('moder_se');
  if $m;
  if $m;
  if $m;