主页 / 问题 / 1057274
Accepted
edem
Asked:2020-12-11 19:56:14 +0000 UTC2020-12-11 19:56:14 +0000 UTC

$^F 在 Perl 中代表什么？

  • 772

帮助说：

$SYSTEM_FD_MAX $^F 最大系统文件描述符，通常为 2。系统文件描述符被传递给“exec()”ed 进程，而更高的文件描述符则不是。此外，在“open()”期间，即使“open()”失败（普通文件描述符在“open()”尝试之前关闭），系统文件描述符也会保留。文件描述符的 close-on-exec 状态将根据打开相应文件、管道或套接字时的 $^F 值来决定，而不是“exec()”的时间。

系统文件描述符的最大值，通常为 2。系统文件描述符被传递给由“exec()”生成的进程，而最高文件描述符则不是。此外，在“open()”期间，即使“open()”失败（通常文件描述符在“open()”尝试之前关闭），系统文件描述符也会被保留。exec 结束时文件描述符的状态将在打开相应的文件、管道或套接字时根据 $^F 的值进行评估，而不是在“exec()”期间。

其实，这一切是为了什么？以及如何使用它？

perl

1 个回答

  1. Best Answer

    为了能够影响打开的文件描述符（文件处理程序 - FD）的 close_on_exec 标志，这是必要的。当 exec 启动的进程不足以通过 stdin/stdout 时，这些是极其罕见的情况。但是如果有一个程序使用了一些在启动时继承的额外文件描述符，则可以通过将$^F变量更改为大于 2 的数字来传递它们，具体取决于您需要传输超出指定的 FD 的数量二。

    可重现的例子。我们创建 2 个文件：

    a.pl:

    #!/usr/bin/perl
$^F=3; # Без этой строки ничего не работает.
       # Вместо 3, может 5, 10 и т.д
open(my $file, ">", "debug.txt"); # В большинстве unix систем
                                  # при открытии первого файла в программе 
                                  # он получит файловый дескриптор 3.
print "fileno: ", fileno($file), "\n"; # Убедимся в этом
exec('/usr/bin/perl', 'b.pl'); # Запустим другую программу
                               # (указать правильный путь к perl)

    b.pl：

    #!/usr/bin/perl
open(my $file, ">&=", 3); # Связать filehandle $file с 3 файловым дескриптором
print $file "message";

    在没有该行的情况下运行 a.pl$^F=3将导致一个空的debug.txt文件和错误消息“ print() on closed filehandle $file at b.pl ”。如果有$^F=3错误，则不会有错误，字符串“message”将被写入文件。除了 b.pl 之外，还可以有任何其他程序，例如带有命令的 bashecho message >&3

    • 4

相关问题