if($opsys eq "unix"){flock(FILE, 2);}
else{binmode(FILE);}