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