It's not really clear to me what you want to do, but Devel::Caller::IgnoreNamespaces might be useful. It's basically the caller magic from Hook::LexWrap, extracted so that other modules can use it.