$ perl -wE 'sub f { 42 } say \&f()'
SCALAR(0x7f8070805480)

##</code><code>##

$ perl -wE 'sub f { 42 } say \&f'
CODE(0x7ff5d90314f0)