Maybe you could use the __WARN__ signal.
Something like...

$SIG{__WARN__} = sub {
   SomeModule::errhandler(@_);
};
[download]

Now all warn, carp and cluck commands should get routed through this code.