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

[oleg alexeenkov]

Alexandr Alexeev <afiskon на gmail.com> писал(а) в своём письме Tue, 30 Oct  
2012 20:43:27 +0400:

не foreach а each, и пример не торт.

> Сегодня один перловик заверил меня, что программа
>
> my @arr = (1, 2, 3, 4);
>
> foreach (@arr) {
>   last;
> }
>
> foreach (@arr) {
>   print "$_\n";
> }
>
> должна выводить 2, 3, 4.  Проверил на 5.14.2 - нет, все работает, как
> и ожидалось, получаем 1, 2, 3, 4. Скажите, кто-нибудь знает о подобной
> особенности перла? Может, я не совсем правильно пример запомнил?
>