That is not accurate.

my $coy = [ 1, 2];
my @coy = @$coy;
$coy[1] = 666;
use Data::Dumper;
die Dumper( $coy, \@coy );
__END__
$VAR1 = [
          1,
          2
        ];
$VAR2 = [
          1,
          666
        ];
[download]

Don't ask me to explain, I don't know Terse (and may be some "copy on write" magic going on).

MJD says you can't just make shit up and expect the computer to know what you mean, retardo! I run a Win32 PPM repository for perl 5.6x+5.8x. I take requests. ** The Third rule of perl club is a statement of fact: pod is sexy.