如何将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没有的标准方法是获取文件中的行数而不依赖于上面那种依赖于操作系统的解决方法.其他,也就是说,打开文件,计算行数,然后倒回到文件的开头开始阅读.