shell - 如何添加 shell 命令并在 Fortran 程序中使用结果？

Question

是否可以从 Fortran 脚本调用 shell 命令？
我的问题是我分析了非常大的文件。这些文件有很多行，例如84084002 或类似电话。
在开始分析之前，我需要知道文件有多少行，因此我通常使用shell命令:wc -l "filename" ，然后将此数字用作脚本中一个变量的参数。
但是我想从我的程序中调用这个命令并使用行数并将其存储到变量值中。

Answer 1

自 1984 年以来，实际上在 2008 标准中，但已经被大多数常见的 Fortran 编译器实现，包括 gfortran ，有一个标准的内在子程序execute_command_line大致上执行了广泛实现但非标准的子程序 system做。正如@MarkSetchell(几乎)写的那样，您可以尝试

CALL execute_command_line('wc -l < file.txt > wc.txt' ) 
OPEN(unit=nn,file='wc.txt') 
READ(nn,*) count 

Fortran 没有的是一种标准方法，可以在其中获取文件中的行数，而无需求助于上述依赖于操作系统的解决方法。其他的，就是打开文件，统计行数，然后倒回到文件的开头开始读取。