目前,我正在使用来自我的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号码)？

解决方法:

如果这是在POSIX环境中,库函数popen()也可能是可用的.

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

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