open LOGFILE, ">>$logfile" or die("can't open"); flock(LOGFILE, LOCK_EX) or die("can't lock ($!)")