Sure, \@letters doesn't change. But when you leave the loop, @letters has been set back to r a c e--it looks like it hasn't changed, but it's really just been looped back to where it started.

A few more print()'s would make this clear...

Update: Fixed a typo, plus here's a modified version that makes it clearer what's happening (to me, anyhow): 

#!perl -l

use strict;
use warnings;

my $some_word = 'race';

my @letters = split //, $some_word;

my (@array1, @array2);

for (1 .. @letters) {
    my @new = @letters;
    push (@array1, \@new);
    push (@array2, \@letters);
    my $myshift = shift @letters;
    push(@letters, $myshift);
    print "$_ : @letters : $array1[-1] : $array2[-1]"
}

print '';
print "array1 contains:";

foreach my $aref (@array1) {
   print "$aref => @$aref";
}

print '';
print "array2 contains:";

foreach my $aref (@array2) {
   print "$aref => @$aref";
}

__END__

1 : a c e r : ARRAY(0x8067740) : ARRAY(0x805f380)
2 : c e r a : ARRAY(0x807c91c) : ARRAY(0x805f380)
3 : e r a c : ARRAY(0x807c8c8) : ARRAY(0x805f380)
4 : r a c e : ARRAY(0x807c820) : ARRAY(0x805f380)

array1 contains:
ARRAY(0x8067740) => r a c e
ARRAY(0x807c91c) => a c e r
ARRAY(0x807c8c8) => c e r a
ARRAY(0x807c820) => e r a c

array2 contains:
ARRAY(0x805f380) => r a c e
ARRAY(0x805f380) => r a c e
ARRAY(0x805f380) => r a c e
ARRAY(0x805f380) => r a c e

[download]

Update 2: kiat asks: (W)hy doesn't \@letters point to the changed @letters inside the loop? That's just it--it does!

In reply to Re^3: Puzzled by array by trammell
in thread Puzzled by array by kiat

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.