open FILE, "$filename" or die $!;
      flock(FILE,2);
      seek(FILE,0,2);
        @entries = <FILE>;
      flock(FILE,8);