Show using waitpid in IPC::Open[23] SYNOPSIS

[p5sagit/p5-mst-13.2.git] / lib / IPC / Open3.pm

diff --git a/lib/IPC/Open3.pm b/lib/IPC/Open3.pm
index f934e89..220b945 100644 (file)
--- a/lib/IPC/Open3.pm
+++ b/lib/IPC/Open3.pm
@@ -26,6 +26,9 @@ IPC::Open3, open3 - open a process for reading, writing, and error handling
     $pid = open3($wtr, $rdr, $err,
                    'some cmd and args', 'optarg', ...);
 
+    waitpid( $pid, 0 );
+    my $child_exit_status = $? >> 8;
+
 =head1 DESCRIPTION
 
 Extremely similar to open2(), open3() spawns the given $cmd and