微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

perl – 关于IO :: Select的澄清

我正在使用 IO::Select.

我没想到只有当我手动终止分叉进程时才会终止此代码.这是正确的行为吗?

use strict;
use warnings;

STDOUT->autoflush();

use IO::Select;

open(my $ph,"-|","perl -e 'sleep 1 while 1'");

my $sel = IO::Select->new();

$sel->add($ph);

$sel->can_read(2) or warn "timeout\n";

print "woohoo?\n";

解决方法

open,

Closing any piped filehandle causes the parent process to wait for the child to finish,then returns the status value in $? and ${^CHILD_ERROR_NATIVE}.

因此关闭$ph中的文件句柄(当$ph超出范围时完成)等待孩子完成.

(这与IO ::选择或选择无关.)

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐