>> die "Can't connect\n";

Вообще, ошибка тут. )
Тут разумно sleep сделать ненадолго, а затем реконнектиться пробовать, но никак не убивать поток. Ну и прокси заюзать, наверно, стоит.
p.s. А локи тут нигде не нужны. )

как заюзать прокси, я ни када не юзал просто(

Например, можно IO::Socket::Socks использовать.

а где это взять и как им пользоваться???

Это превад.
Но, так и быть, отдам тебе за 10wmz.

мдя : D

MaTpOc
Диджимортал кедала, пару дней назад всё слилось в паблик но доступно только для узкого круга
Вот тебе пожалуй покажу, только тссссс! Больше некмоу не говори
http://search.cpan.org/~reatmon/IO-Socket-Socks-0.1/lib/IO/Socket/Socks.pm

__________________
God forgive me for I have sinned
It’s been six months since my last confession
There is nowhere that I can run to
My soul I place in your hands

Лол, эта функция вызывается один раз, до начала потоков ))

Простые хттп прокси можешь указывать вместо
PeerAddr => 'vkontakte.ru',
PeerPort => 80,

Только в пост запросе полный путь пропиши.

Kaimi, я согласен с тем что ошибка не из-за этого, но ты всё таки загрузи файлик с мылами на 1 гб и посмтрим прав я или нет ))
И каждый поток берёт примерно 1,5 мб оперативы
С этим тоже будешь спорить?

__________________
God forgive me for I have sinned
It’s been six months since my last confession
There is nowhere that I can run to
My soul I place in your hands