% perl -E '*Some::Module::foo = sub { say "hello" }; Some::Module::foo()'
hello