Програмирование на Perl
Перепишите свой код по-человечески, чтобы читать можно было. Глядишь, и ошибку увидите.
я бы с радостью, но код не мой, мне его любезно написал один человек. Я с Perl работаю впервые.