my $ref = do { no strict 'refs'; \&$var }; $ref->();