> perl -e ' @a=(1,2,3); $t= \@a; print $t,"\n";'
ARRAY(0x806d3b4)