my @list = (3,2,1);
my @refs = ([@list]) x @list;
print "@refs\n";
__END__

which prints:

ARRAY(0x80f3764) ARRAY(0x80f3764) ARRAY(0x80f3764)