open TEST, ">test.html" or die "A grim and horrible death: $!";
unless ( flock test, 6 ) {
  close TEST;
  die "Couldn't get the lock!";
}