you can also try something:

use Fcntl;
open FILE, $file, O_EXLOCK 
or die "Cannot open or lock $file. $!\n";
[download]

to lock the file exactly when you open it

Antonis!