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 } );