Message-Id: <
200204161031.MAA08156@mom.intra.onlineoffice.de>
p4raw-id: //depot/perl@15946
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