Одной из причин больших тормозов интерфейса панели сейчас является отсутствие кеширования подсчета трафика. Перестал лениться и повтыкал везде кеширование для всех типов трафика: sub traf_month # get traffic for last month in megabytes
{
my $self = shift;
my $db = $self->{data}->{db};
my $sql = 'SELECT traf_month FROM traf_cache_domains WHERE domain_id=? AND dt >= (NOW() - INTERVAL 1 HOUR) LIMIT 1';
my $sth = $db->sql($sql, $self->id);
my $traf = $sth->fetchrow_hashref->{traf_month} if... read more
