Help for this page

Select Code to Download


  1. or download this
    use Log::Log4perl qw(:easy);
Log::Log4perl->easy_init( { level => $INFO, file => $logfile } );
...
    INFO "Email sent...";
}
# ...
  2. or download this
    Log::Log4perl->easy_init( { level => $ERROR, file => $logfile } );
my $sender = Email::Stuffer->new;
# etc
my $sent = $sender->send;
Log::Log4perl->easy_init( { level => $INFO, file => $logfile } );