Lock a Text File in Perl [duplicate]

This question already has answers here: Closed 12 years ago.

Possible Duplicate:

How do I lock a file in Perl?

Does anyone kno开发者_如何学Cw how to lock a text file in Perl so only one thing can write to it until it is unlocked? I need something other than setting the read/write attributes. Thanks.

---

Take a look at flock.