Лучший способ перебрать массив Perl
Какая реализация (с точки зрения скорости и использования памяти) является лучшей для перебора массива Perl? Есть ли лучший способ? @Array
не нужно хранить).
<code>foreach (@Array) { SubRoutine($_); } </code>Реализация 2
<code>while($Element=shift(@Array)) { SubRoutine($Element); } </code>Реализация 3
<code>while(scalar(@Array) !=0) { $Element=shift(@Array); SubRoutine($Element); } </code>Реализация 4
<code>for my $i (0 .. $#Array) { SubRoutine($Array[$i]); } </code>Реализация 5
<code>map { SubRoutine($_) } @Array ; </code>