ну, или "абстрактная фабрика говна", смотря что там под капотом

Если-бы, строчек в итого больше

Да while в данном примере делает свое дело, я тут скорее к тому, что foreach не решает проблему отсутствия итераторов, например есть какая-то сложная структура, и вот есть у тебя алгоритм её обхода, при наличии итераторов возвращается итератор, который можно вставлять во все места где ожидается итерируемая сущность, а в случае перла или делать как ты сказал с while (тогда неполучится использовать результат в map grep и т.д.  ) или возвращать список что влечёт дополнительные расходы по памяти

если там реально нужно эту сложную сущность представить как массив, в перле есть tie - я пробовал, прикольно

Вот у меня на практике реально была только одна ситуация, когда это понадобилось в перле и да, я как раз через tie её и решил)

ну вот о чем и речь, что потребность в колбасе итераторах сильно преувеличена

Я бы просто сделал hard ulimit на cputime и таймаут в хосте

А если итерировать через классический while (defined @arr[$i]){ body; $i++ } ? Какой бы умный итератор не был, ему всё равно надо сверять, дошёл он до конца или нет.

@arr[$i] это не очень хорошо

очепятался)

И всё равно нужно сначала каждый элемент @arr вычислить

Для такого кода

там конечно же должен быть забор значения по индексу а не срез)

на cpan есть perlude с аналогами map/grep/.. для генераторов

Блин, товарищи!
Как так, за что?

my$    x = 1;
say $x

а что такого

Ну т.е. я знал, что есть те, кто реально my$x пишут на Преображенской площади в Мск.
Но чтобы даже "my$    x" было нормой...

А как так-то? Век живи - век учись, с какой стати сигил можно отделять?

вероятно, для читаемости?

Ты это серьёзно или прикалываешься?