use strict;
use warnings;
use MIME::Lite;
use FileHandle;
use File::Copy;
use Logfile::Rotate;
use Fcntl qw(:flock);


flock($RLOG, LOCK_SH|LOCK_NB) || warn "no NB lock $!";
flock($MLOG, LOCK_SH|LOCK_NB) || warn "no NB lock $!";