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