ANTICHAT - Показать сообщение отдельно - pproxy

Большое спасибо за скрипт, но у меня частенько выдает ошибку

Цитата:

Сообщение от None

Can't call method "remove_header" on an undefined value at plocal.pl line 100

Посмотрел по коду - переменная $request не проверяется на валидность. ИМХО нужно добавить после строки

Код:

#Прием HTTP-запроса
        my $request = $conn->get_request();

Такой код:

Код:

#Проверка валидности запроса
        unless(defined($request))
        {
            close $conn;
            return;
        }

И еще вопрос - автор пишет:

Цитата:

Сообщение от None

Альтернативный клиент(Delphi/Pascal) с открытым исходным кодом доступен тут http://dump.ru/file/3320224

Но там ссылка умерла. Возможно у кого-то остались исходники?