Скорость загрузки старницы

Тебе надо $start заново выставлять на каждой итерации. А так конечно, чем больше итераций, тем больше времени проходит от начала :)

на фиг там 10 вариаций проверки

На всякий случай. Может у тебя канал нестабильный, пакеты могут теряться - одна загрузка может быть полсекунды, а другая четыре секунды.

Да и советую как общий совет использовать тот же модуль https://metacpan.org/module/Devel::NYTProf

Xellos

Да пробовал выставлять..не работает правильно всеравно.

Другого скрипта не могу найти на перле.

pinachet

Не понял с помощью Devel::NYTProf тоже можно время определять?

Новый скрипт покажи. И расскажи, что там не работает и как именно не работает.

Попробовал упростить, что бы понимать что там творится вообще, но все же некоторые моменты не ясны..я их описал в скрипте, а сам он не выводит ничего...(прокся валидная) Я там убрал вариации всякие и прочее.. http://pastebin.com/dpbuT2VM

не понимаю что в ней происходит

$ua - user agent. Сущность, которая посылает HTTP-запросы и получает ответы.
$ua->get() - послать GET запрос.
:content_cb => sub {} - при получении результата вызвать подпрограмму, замыкание.
$_[0] - первый элемент массива @_, в данном случае - ответ сервера (он передаётся первым аргументом в нашу подпрограмму).

Важный момент - ответ читается не весь сразу, а кусками. По нескольку сотен символов. И на каждый кусок вызывается коллбэк.
Да, и в конце вот стоит <> - это такой хитрый способ ожидать нажатия enter. Оно не нужно. Его надо убрать.

Всё, дальше разжёвывать азы языка и алгоритма не буду.

Ну понял я..почему не работает вот главный вопрос ? Так увлекся даже про <> рассказал)