*r = \"moose";
print ref \*r;             # GLOB
print ${*r};               # moose