open PIPE_ONE, 'echo -e "oranges"|' or die "Can't fork";
open PIPE_TWO, 'echo -e "apples"|' or die "Can't fork (again?)";

my $line_pipe_one = readline(*PIPE_ONE);