package SomeModule;
    sub do_something {
       # ... something's going on ...
        print STDERR "D'oh! Error!";
    }

##</code><code>##

        # What can I do here to direct STDERR messages
        # to errhandler() ?
    sub errhandler { ... }

    SomeModule::do_something();