C:\test>perl -E"$p = open I, '-|', '( echo fred & echo jim ) | interact.pl'; say for <I>;"
Got: fred  jim