[Moscow.pm] Вопрос про foreach

[Alexandr Alexeev]

Сегодня один перловик заверил меня, что программа

my @arr = (1, 2, 3, 4);

foreach (@arr) {
  last;
}

foreach (@arr) {
  print "$_\n";
}

должна выводить 2, 3, 4.  Проверил на 5.14.2 - нет, все работает, как
и ожидалось, получаем 1, 2, 3, 4. Скажите, кто-нибудь знает о подобной
особенности перла? Может, я не совсем правильно пример запомнил?


-- 
Best regards,
Alex Alexeev
http://twitter.com/afiskon