##
perl> use constant X => 12345;;
perl> print X;;
12345
perl> print "${ \ X }";;
12345
perl> print "@{[ X ]}";;
12345
perl> print 'stuff ' . X .' other stuff';;
stuff 12345 other stuff
perl> printf "stuff %s other stuff\n", X;;
stuff 12345 other stuff
####
perl> *X = sub{ 12345 };;
perl> *X = \12345;;
perl> print X;;
12345
perl> print "${X}";;
12345
perl> print "$X";;
12345