请教是否可以实现fork的进程同父进程共享某个变量

socyno

UID: 40994
帖子: 0
积分: 0
在线时间: 10 分钟

1^# socyno 发表于 2007-11-25 19:17

请教是否可以实现fork的进程同父进程共享某个变量

use IO:ipe;
use vars qw/$moniter $pipe $pid/;

$pipe = new IO:ipe;

if($pid = fork())
{
$pipe->writer();

open(STDOUT, '>&', $pipe);
open(STDERR, '>&', $pipe);

system("grep 'ppp' /usr/ -R";
}
elsif($pid == 0)
{
$pipe->reader();
while(<$pipe> {
$moniter = $_;
print "...", $moniter;
}
}

__END__

程序如上，我想问问有什么方法可以让父进程和子进程共享变量$moniter

apile

UID: 42255
帖子: 66
积分: 151
在线时间: 6 小时

2^# apile 发表于 2007-11-29 13:05

share memory....
请看network programming with perl
里面有教你怎麽在share memory中allocate一块内存...存取变量值

socyno

UID: 40994
帖子: 0
积分: 0
在线时间: 10 分钟

3^# socyno 发表于 2007-12-01 16:18

谢ls的，正在研究中。。。。

soichiro

UID: 33959
帖子: 35
积分: 80
在线时间: 1 小时

4^# soichiro 发表于 2007-12-04 09:58

可以用IPC::Shareable或IPC::ShareLite，但可移植性不好，Win32下要用Win32::MMF。

另外进程异常终止后共享内存不会注销。

所以进程间通讯最好还是用双向Pipe或Socket。