in reply to How do I lock a file in perl?

Check out flock().