
14.02.2008, 16:36
|
|
Banned
Регистрация: 22.08.2006
Сообщений: 608
Провел на форуме: 6144796
Репутация:
1095
|
|
>> # Todo: print results to text files, use threads
ну так сразу б уже и сделал, там делов на 10 минут.. )
заместо
Код:
...
for (my $i=0; $i < scalar @socks; $i++)
{
my ($server, $port) = split(/:/, $socks[$i]);
...
лучше использовать нечто вроде
Код:
...
while (scalar @socks) {
my ($server, $port) = split(/:/, shift @socks);
...
особенно если треды заюзаешь..
|
|
|