INIT { @CARP_NOT = map /::$/ && "Foo::Bar::$_", keys %Foo::Bar:: }