индекс массива в foreach

[Phoinix]

synthez

Уже увидел ("$end - 1"), только насчет вот этой конструкции не понял...

$end = $#array;

$end = @array;

Пиши в следующий раз код полностью, что бы не пришлось домысливать

my $end = @array;
foreach my $n (0..$end) {
  print $array[$n]
}

[synthez]

Phoinix
иногда забываю, что с нуля начинаеться =)

[Mog.]

Короче, вариантов много, но все они сводятся к разного рода счетчикам иттерации цикла перебора массива, т.к. встроенного механизма получения индекса массива в цикле типа
for(@array)
{
действие;
}
вроде как нету.