Help for this page
foo($obj); $obj->foo();
print join("\t",ref(\[]),ref(\"foo"),ref(\*glob),ref(\do{my $x=*fo +o})); # REF SCALAR GLOB GLOB