Someone asked something like this a while. You can check perldoc perlipc about wrapping $SIG{__WARN__} and $SIG{__DIE__}. There's a module I wrote based on an merlyn's article, called Cpan::Mailer which sends an email to one in case warn, die or any Carp functions were called.

By the way, it is a simple wrapping around the standard way of doing things in Perl, i.e. open() or die();.

As said before, Log::Log4perl is extensible enough to allow you doing the procedures you need (send an email, log to this or that log file, etc).