open I,'myInProg|'; open O,'|myOutProg'; print O while ;