open IN, "output" or die "Can't open file\n";
  while(<IN>) { 
    # do something with $_
  }
  close IN;