in reply to Lock File

Use flock.

In Section Seekers of Perl Wisdom