http://www.perlmonks.org?node_id=310272


in reply to use deprecated;

Is there a straightforward and robust way to hook each named deprecated sub with a separate check-and-carp behavior?

Hook::LexWrap (and others in the Hook:: namespace) will allow you to write your import() routine to wrap deprecated subs to emit the necessary warnings.