进程间如何通信！？

[Xfly]

我要写一个perl程序，要求是多进程的，子进程与父进程之间需要通信，
并且父进程不定期的需要给子进程发送数据信息，子进程再对这些数据做处理！

哪为高手能给些这方面的指点，感激不尽！

以下这段函数利用管道实现了进程间的通信，但是无法做到“父进程不定期的给
子进程
发送数据信息，子进程接收这些数据信息”！希望高手能帮忙改一下！
#! /usr/bin/perl
pipe(INPUT, OUTPUT);
$retval = fork();
if ($retval != 0) {
# this is the parent process
close (INPUT);
print ("Enter a line of input:\n");
$line = <STDIN>;
print OUTPUT ($line);
print "Parent\n";
} else {
# this is the child process
close (OUTPUT);
$line = <INPUT>;
print ($line);
print "Child\n";
}

[sunsetyang]

You can try to use pipe.The parent can write to the pipe,while the child process read the pipe.If the pipe is empty,the child process will block.