1package Foo; 2 3# Hook::LexWrap does this, Sub::Uplevel appears to interfere. 4sub import { *{caller()."::fooble"} = \&fooble } 5 6sub fooble { 42 } 7 81; 9