$SG = open(Proc1,"Program1.exe|");
$FW = open(Proc2,"Program2.exe|");

while (<Proc1>) || <Proc2>) {
   print $_;
}