$ perl -e'for(1..10){my @rv; my $ref=\@rv; print "$ref\n"}'
ARRAY(0x810218c)
ARRAY(0x810218c)
ARRAY(0x810218c)
ARRAY(0x810218c)
ARRAY(0x810218c)
ARRAY(0x810218c)
ARRAY(0x810218c)
ARRAY(0x810218c)
ARRAY(0x810218c)
ARRAY(0x810218c)