use Log::Log4perl;

Log::Log4perl::init(\<<'_EOL_');

log4j.rootLogger = DEBUG, Email

log4j.appender.Email = Log::Dispatch::Email::MailSendmail

log4j.appender.Email.smtp = mail.mydom.com

log4j.appender.Email.to = admin@mydom.com

log4j.appender.Email.from = me@mydom.com

log4j.appender.Email.buffered = 1

#log4j.appender.Email.subject = 

log4j.appender.Email.layout = Log::Log4perl::Layout::SimpleLayout

_EOL_