for (1..4) { push @a, $_, last if $_ == 3; } print "@a\n"; __END__ Bizarre copy of ARRAY in last at - line 1. The behavior is the same in Perl 5.005_04, 5.005_03, and 5.6.0. Of course the user is wrong but why miss an opportunity to tell them so in more florid terms? :-)Thread Next