my $coderef = do { no strict 'refs'; \&{ $subname } };