我有以下问题。我想在 Fortran90 中编写一个程序，我希望能够像这样调用它：
./program.x < main.in > main.out
除了“main.out”（我可以在调用程序时设置其名称）之外，必须编写辅助输出并且我希望它们具有与“main.in”或“main.out”相似的名称（它们是实际上并不称为“主要”）；但是，当我使用：
INQUIRE(UNIT=5,NAME=sInputName)
sInputName 的内容变为“Stdin”而不是文件名。调用程序时有什么方法可以获取链接到标准输入/标准输出的文件的名称吗？
不幸的是，i/o 重定向的重点是您的程序不必知道输入/输出文件是什么。在基于 unix 的系统上，您无法查看命令行参数，因为< main.in > main.out它们实际上是由 shell 处理的，shell 在调用程序之前使用这些文件设置标准输入和输出。
您必须记住，有时标准输入和输出甚至不是文件，因为它们可能是终端或管道。例如
./generate_input | ./program.x | less
因此，一种解决方案是重新设计您的程序，以便输出文件是一个显式参数。
./program.x --out=main.out
这样你的程序就知道文件名了。代价是您的程序现在负责打开（并且可能创建）文件。
也就是说，在 linux 系统上，您实际上可以从特殊的 /proc 文件系统中找到标准文件句柄指向的位置。每个文件描述符都有符号链接
/proc/<process_id>/fd/0 -> standard_input
/proc/<process_id>/fd/1 -> standard_output
/proc/<process_id>/fd/2 -> standard_error
抱歉，我不知道 fortran，但检查输出文件的伪代码方法可能是：
out_name = realLink( "/proc/"+getpid()+"/fd/1" )
if( isNormalFile( out_name ) )
...
请记住我之前所说的，没有 garauntee 这实际上是一个普通文件。它可能是一个终端设备、一个管道、一个网络套接字，等等……另外，我不知道除了 redhat/centos linux 之外还有什么其他操作系统，所以它可能不那么便携。更多的诊断工具。
也许内在的子程序get_command和/或get_command_argument可以提供帮助。它们是在 fortran 2003 中引入的，它们要么返回用于调用程序的完整命令行，要么返回指定的参数。