$ perl -E'
   say \*x;         # Prints the address of the glob.
   say \@x;         # Prints the address of the array.
   say *x{ARRAY};   # Prints the address of the same array.
   say \%x;         # Prints the address of the hash.
   say *x{HASH};    # Prints the address of the same hash.
'
GLOB(0x2f78fd8)
ARRAY(0x2f79080)
ARRAY(0x2f79080)
HASH(0x2f79038)
HASH(0x2f79038)