$ ./perl -we 'my *foo = *bar; print *foo, "\n"' Name "main::bar" used only once: possible typo at -e line 1. *main::bar