package IO::Pipe;
-require 5.6.1;
+use 5.006_001;
use IO::Handle;
use strict;
if($pid = fork()) { # Parent
$pipe->reader();
- while(<$pipe> {
- ....
+ while(<$pipe>) {
+ ...
}
}
elsif(defined $pid) { # Child
$pipe->writer();
- print $pipe ....
+ print $pipe ...
}
or
$pipe->reader(qw(ls -l));
while(<$pipe>) {
- ....
+ ...
}
=head1 DESCRIPTION
=item new ( [READER, WRITER] )
-Creates a C<IO::Pipe>, which is a reference to a newly created symbol
+Creates an C<IO::Pipe>, which is a reference to a newly created symbol
(see the C<Symbol> package). C<IO::Pipe::new> optionally takes two
arguments, which should be objects blessed into C<IO::Handle>, or a
subclass thereof. These two objects will be used for the system call