# open/reopen
  my $filename = "anchor.txt";
  open FCMP, "<", $filename
    or die "Couldn't open '$filename': $!";

  # or, alternatively

  seek FCMP,0,0; # rewind