open FH, '<', 'file.txt' or die ("Can't read file: $!");

until( eof(FH) ) {
  print <FH>;
}