[Moscow.pm] Perl Socket application

[Eugene Kaltashkin]

День добрый.

Заметил странную особенность, во многих модулях присутствует довольно
серьёзная утечка памяти.
Когда за неделю работы модуль распухает в памяти с 5 мегов до 90 это
начинает напрягать.
Понимаю, что это в основном косяки программистов написавших модуль, но
может есть средства диагностики какие-нибудь ?

Второй вопрос на который не могу нигде найти ответа.
какая структурная форма для констант лучше ?

sub DEBUG() { 0 }
или
use constant DEBUG => 0;
или все таки
$DEBUG = 0;

странно, но на $DEBUG обработка данных быстрее, хотя должно быть
наоборот при использовании constant.

-- 
Best Regards
ZHECKA-RIPN