Фильтр по услугам

[0xbad0c0d3]

Мне показалось, что в функционале не хватает такого фильтра, чтобы можно было по конкретной услуги фильтровать... Добавил
web/listusers.pl
находим строку

Код:

&ahref("$scrpt&f=5",'С активированными услугами').

и после нее лепим:

Код:

&div('rght',join('',map {
      my($srv)=split('-',$srvs{$_});
      &ahref("$scrpt&f=5$_",$srv);
} sort {$a<=>$b} keys %srvs)).

в результате имеем:

Код:

&ahref("$scrpt&f=5",'С активированными услугами').
&div('rght',join('',map {
      my($srv)=split('-',$srvs{$_});
      &ahref("$scrpt&f=5$_",$srv);
} sort {$a<=>$b} keys %srvs)).

далее отправимся на поиски такого:

Код:

  'w' => ["$sel_from_users (cstate=9 OR cstate=10)",    'На подключении'],
);

а когда найдем, после него лепим следующее:

Код:

foreach my $id (keys %srvs){
        my($srv)=split('-',$srvs{$id});
        $filtrs{"5$id"}=["$sel_from_users ((srvs >> ".($id-1).") & 1)","Услуга $srv"];
}

получим такое:

Код:

  'w' => ["$sel_from_users (cstate=9 OR cstate=10)",    'На подключении'],
);

foreach my $id (keys %srvs){
        my($srv)=split('-',$srvs{$id});
        $filtrs{"5$id"}=["$sel_from_users ((srvs >> ".($id-1).") & 1)","Услуга $srv"];
}

А дальше просто оргазмируем от удовольствия, что можем фильтровать свои запросы по услугам.
P.S. &div('rght',....) является не обязательным, птосто так мы визуально отделим услуги.

[Efendy]

Отлично. Кстати, рекомендую не писать & перед именами подпрограмм, то у меня были обострения маразма, а этот символ реально раздражает т.к. информации становится больше, а смысловой нагрузки он не несет.

[0xbad0c0d3]

))) Меня не раздражает, а vim отлично подсвечивает.

[stix]

круто

[poxy.]

Спасибо, +1

[Андрій]

корисна річ +1