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