diff options
author | Slaven Rezic <slaven@rezic.de> | 2002-10-13 16:26:26 +0200 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-10-14 20:37:06 +0000 |
commit | 76c0e0db388a8b90df585b75a0a5c34b2742b9c0 (patch) | |
tree | 50dc5eb6c08a56db648b4c619162783606bec92a /pod/perlipc.pod | |
parent | 835863de2945cb40752175f56d8052effcf408a4 (diff) | |
download | perl-76c0e0db388a8b90df585b75a0a5c34b2742b9c0.tar.gz |
perlipc.pod
Message-Id: <200210131226.g9DCQQLN014591@vran.herceg.de>
p4raw-id: //depot/perl@18017
Diffstat (limited to 'pod/perlipc.pod')
-rw-r--r-- | pod/perlipc.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlipc.pod b/pod/perlipc.pod index 6ab14def00..40693a500d 100644 --- a/pod/perlipc.pod +++ b/pod/perlipc.pod @@ -555,7 +555,7 @@ And here's a safe pipe open for writing: # add error processing as above $pid = open(KID_TO_WRITE, "|-"); - $SIG{ALRM} = sub { die "whoops, $program pipe broke" }; + $SIG{PIPE} = sub { die "whoops, $program pipe broke" }; if ($pid) { # parent for (@data) { |