执行命令行并返回命令输出

Question

目前，我正在使用来自我的fortran程序的shell命令行调用，使用非标准的SYSTEM内部例程（类似于Fortran 2008 EXECUTE_COMMAND_LINE内在函数）：

CALL SYSTEM(commandStr)

其中commandStr是一个包含我想要执行的shell命令的字符串。目前，我不知道返回commandStr输出的直接方法，只知道返回状态。所以，我现在正在做的是将输出写入文件，然后从Fortran程序中读取文件。例如：

CALL SYSTEM('sed ''s/,//g'' myFile > dummyFile')

如果我想从myFile中删除逗号。然后我使用OPEN和READ来获取dummyFile的内容。

这很好用，但我担心从磁盘写/读文件，特别是如果我在长循环中这样做，并且如果commandStr输出很大。有没有办法将commandStr输出重定向到我可以直接从我的Fortran程序访问的内存缓冲区（而不是硬盘）中（可能通过特定的UNIT编号）？

Answer 1

如果这是在POSIX环境中，库函数popen()也可能可用。

iunit = popen ('sed ''s/,//g'' myFile', 'r')

查看Fortran环境的文档，因为我不确定将i / o连接到Fortran的语义。如果它类似于C运行时库，则文件连接还需要一个特殊函数来关闭它，pclose()。