open (FILE, $my_file);
flock FILE, 2; #exclusive lock

#Parse file and do various things with the content.

flock FILE, 8; # unlock
close ( FILE );
unlink $my_file;