从Perl调用Fortran程序而不保存输入/输出文件

Question

我正在使用Perl程序将用户输入正确格式化为Fortran程序的输入文件.Fortran程序创建输出文件和错误文件.从Perl调用Fortran程序,如:

system "/mydirectories/fortranexecutable $inputfile $outputfile $errorfile";

我想知道是否有办法调用Fortran可执行文件而不实际创建输入/输出/错误文件并在调用Fortran程序之前/之后将它们保存到磁盘？我希望我的问题很清楚,而不是太明显.我是Perl的新手,我试着到处寻找这个.感谢您的帮助.

Answer 1

如果Fortran代码顺序读取并顺序写入现有文件,但您希望通过Perl代码"实时"与它进行通信,那么您可以使用命名管道.它们仍然作为文件系统中的条目存在,并且可以通过Fortran代码打开它们的名称,但是从它们读取/写入它们就像管道一样.

在Perl中你会做这样的事情(从这个答案公然复制):

use File::Temp qw(tempdir);
use File::Spec::Functions qw(catfile);
use POSIX qw(mkfifo);

my $dir = tempdir(CLEANUP=>1);
my $inputfifo = catfile($dir, "input");
mkfifo($inputfifo, 0700) or die "mkfifo($inputfifo) failed: $!";
my $outputfifo = catfile($dir, "output");
mkfifo($outputfifo, 0700) or die "mkfifo(output$fifo) failed: $!";
my $errorfifo = catfile($dir, "error");
mkfifo($errorfifo, 0700) or die "mkfifo($errorfifo) failed: $!";

... open the FIFOs ...

system "/mydirectories/fortranexecutable $inputfifo $outputfifo $errorfifo";

... operate with the FIFOs to communicate with the Fortran code ...

... close FIFOs and remove $dir when finished ...