PHP 的 proc_open()、proc_close() 等的 Perl 等价物是什么？

发布于 2024-09-26 01:14:46 字数 670 浏览 7 评论 0原文

使用 PHP 的 proc_open()，我可以启动一个进程，在进程运行时使用 fread() 从 STDOUT 和 STDERR（分别）一次读取任意数量的字节，在 STDOUT 和 STDERR 管道上使用 feof() 检测进程何时完成，然后使用 proc_close() 获取进程的退出代码。我已经用 PHP 完成了所有这些工作。它运作良好，给了我很多的控制权。

有没有办法在 Perl 中完成所有这些事情？总而言之，我需要能够执行以下操作：

启动外部进程
读取 STDOUT 和 STDERR 分别
读取 STDOUT 和 STDERR 进程运行时一次任意数量的字节（即无需等待进程完成）
检测进程何时完成
获取进程的退出代码

提前感谢您的回答。

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

执笔绘流年 2024-10-03 01:14:46

您可以使用 Perl 的系统调用接口推出您自己的解决方案，但使用内置模块 IPC::Open3 更容易。至于您的列表：

启动外部进程：

use IPC::Open3;
use IO::Handle;
use strict;

my $stdout = IO::Handle->new;
my $stderr = IO::Handle->new;
my $pid = open3(undef, $stdout, $stderr, 'my-command', 'arg1', 'arg2');

分别读取 STDOUT 和 STDERR，一次任意数量的字节：

my $line = <$stdout>;
# Or
sysread $stderr, my $buffer, 1024;

检测进程何时完成：

use POSIX qw(sys_wait_h);

waitpid $pid, 0;  # Waits for process to terminate
waitpid $pid, WNOHANG;  # Checks if the process has terminated

获取进程的退出代码：

my $status = $?;  # After waitpid indicates the process has exited

请务必阅读 IPC::Open3 文档;正如它警告的那样，如果您不小心，当您有单独的 stdout 和 stderr 管道时，很容易陷入僵局。如果子进程填充任一管道，它将阻塞，如果父进程读取其他管道，它将阻塞。

You could roll your own solution using Perl's system call interface, but it's easier to use the built-in module IPC::Open3. As for your list:

Start an external process:

use IPC::Open3;
use IO::Handle;
use strict;

my $stdout = IO::Handle->new;
my $stderr = IO::Handle->new;
my $pid = open3(undef, $stdout, $stderr, 'my-command', 'arg1', 'arg2');

Read STDOUT and STDERR separately, an arbitrary number of bytes at a time:

my $line = <$stdout>;
# Or
sysread $stderr, my $buffer, 1024;

Detect when the process is finished:

use POSIX qw(sys_wait_h);

waitpid $pid, 0;  # Waits for process to terminate
waitpid $pid, WNOHANG;  # Checks if the process has terminated

Get the exit code of the process:

my $status = $?;  # After waitpid indicates the process has exited

Be sure to read the IPC::Open3 documentation; as it warns, it's easy to get yourself deadlocked when you have separate stdout and stderr pipes, if you're not careful. If the child process fills either pipe, it will block, and if the parent process reads the other pipe, it will block.

回复收藏 0 原文