在Fortran中逐行读取逗号分隔的文本文件

Question

我是Fortran新手。我希望能够读取文本文件并将其内容保存在单个变量中。我找到了一个非常有用的Fortran教程（http://www.math.hawaii.edu/~hile/fortran/fort7.htm#read），我试着按照那里列出的一个例子。具体来说，我创建了一个名为 data.txt 的文本文件，其中包含以下文本：

1.23, 4.56, 7.89
11, 13, "Sally"

我已将此文本文件保存在当前目录中。然后，我创建了一个文件 test.f90 （也将其保存在我当前的目录中），其中包含以下代码：

PROGRAM test
  IMPLICIT NONE

  REAL :: x, y, z
  INTEGER :: m, n
  CHARACTER first*20

  OPEN(UNIT = 7, FILE = "data.txt")
  READ(7,*) x, y, z
  READ(7,*) m, n, first

  PRINT *, x
  PRINT *, y
  PRINT *, z
  PRINT *, m
  PRINT *, n
  PRINT *, first
END PROGRAM test

我正在使用GNU Fortran编译器，我认为它包括至少包括Fortran95在内的功能。上面的代码似乎编译好了，至少使用默认设置）。但是，当我运行生成的可执行文件时，我收到此错误消息：

At line 10 of file test.f90 (unit = 7, file = 'data.txt')
Fortran runtime error: End of file

第10行是 READ（7，*）m，n，第一行。你可以帮助我看看我在上面的代码中做错了吗？

Answer 1

当我的示例程序，您的样本数据，它工作！恭喜！输出是：

   1.2300000    
   4.5599999    
   7.8899999    
          11
          13
 Sally 

为了猜测它不适合你的可能原因，有时Fortran可执行文件可能对行结尾敏感，要求为操作系统提供正确的行终止符，包括在数据文件的最后一行。相反，许多编辑将默默地转换行结尾。我经常遇到由Microsoft程序编写的文件的问题。

Answer 2

我可以重现您的确切错误消息和正确的输出。我在Windows上使用gfortran，用记事本创建数据文件 如果使用行尾字符终止第二个数据行（通过按Enter键），程序将显示正确的输出;如果你没有终止它，它将在执行期间显示错误。

基本上，运行时尝试读取一行，但在到达行尾之前遇到文件结束符。

Answer 3

对于某些编译器，在数据的最后一行之后添加一个新行很重要。例如，gfortran是一个需要它的编译器，它是非常合乎逻辑的。 Sun（Oracle）编译器不需要它。