Вот немного периписал http://depositfiles.com/files/kv0iq4vmq, исправил ошибки прошу протестировать и высказать свае мнение, написан на перл, требует модули
use Curses;
use LWP::Simple;
use LWP::UserAgent;
use locale;
use threads;
use threads::shared;
читаей файл proxy.pl там есть реадми
зы отзывы пости сюды