Some thoughts on foreach reverse

[p5sagit/p5-mst-13.2.git] / pod / perlfork.pod

diff --git a/pod/perlfork.pod b/pod/perlfork.pod
index 8ce0739..832710a 100644 (file)
--- a/pod/perlfork.pod
+++ b/pod/perlfork.pod
@@ -208,7 +208,6 @@ write to a forked child:
     else {
        # child
        while (<STDIN>) { print; }
-       close STDIN;
        exit(0);
     }
 
@@ -238,7 +237,6 @@ And this one reads from the child:
     else {
        # child
        print "pipe_from_fork\n";
-       close STDOUT;
        exit(0);
     }