sub foo {
  warn 'fooooo';
}
__PACKAGE_->wrap_sub("foo");