my $x=sub{goto &$ref}->();

##</code><code>##

my $x=&{$::{$ref}}();