Re: Inter-Process Communication


Welcome to the Monastery
	PerlMonks

Re: Inter-Process Communication

by dpuu (Chaplain)

on Jul 21, 2002 at 02:29 UTC ( #183727=note: print w/replies, xml )

Need Help??

in reply to Inter-Process Communication

I'm not sure about the specifics of your Win32 installation. Under cygwin, fork and pipe are implemented, so the following code works:

pipe B,A;

my $child = fork;

die "fork: $!" unless defined $child;

if ($child != 0)
{
        use IO::Handle;
        close B;
        print A "hello\n";
        A->flush;
        sleep 1;
        print A "world\n";
        exit;
}

close A;
while (<B>)
{
        print;
}
[download]

You can do use select to poll the filehandle. Of course, you could simply use your socket instead of opening the pipe. --Dave.

Comment on Re: Inter-Process Communication Download Code

Replies are listed 'Best First'.
Re: Re: Inter-Process Communication by Nitrox (Chaplain) on Jul 21, 2002 at 02:48 UTC
I'm running ActiveState's Perl 5.6.1 build633 and your example runs without errors, but with odd results. It produces no output and hangs indefinetly, but when I ctrl-C the console it then outputs 'hello'. Seems to be a deadlock situation? Also, instead of fork'ing an entire copy, is there a way to spawn a thread that is capable of accessing variables in the parent thread? -Nitrox	[reply]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://183727]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others romping around the Monastery: (4)

As of 2023-12-08 12:30 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?