Select Code to Download

print "flocking now\n";
flock (FILE, 2);
print "done flocking\n";

copy foo bar
rm foo
copy bar foo
rm bar