perl> *X = sub{ 12345 };;
perl> *X = \12345;;
perl> print X;;
12345

perl> print "${X}";;
12345

perl> print "$X";;
12345