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

[Ermak Vadim]

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

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

Не вижу причин для вывода 2, 3, 4
Чья-то шутка? )

-- 
use Perl or die;