flock(SEM, LOCK_EX) || die "Lock failed: $!"