{ # Get an enclosing lexical scope
  no strict 'refs'; # allow symbolic refrence shenanigains
  &$SubHash{key}(); # Call sub
} # Back to strict 'refs'

##</code><code>##

CallFromHash {
  no strict 'refs'; # allow symbolic refrence shenanigains
  return &$SubHash{shift(@_)}(@_); #Call the sub in the first arg with the rest of @_ as args and return
}