$ perl -wE 'sub f { 42 } my $x = \f(); say $$x'
42
$ perl -wE 'sub f { 42 } my $x = \&f(); say $$x'
42