perl -e'$foo={};print ref $foo,"|";push @bar,$foo; print ref $bar[$#bar], "|$bar[$#bar]$/"'
HASH|HASH|HASH(0x8106164)