use IO::Handle; $| = 1; $data1 = "./myC.exe 10 10 1 abc"; open PS, "$data1 |"; PS->autoflush(1); while () { print; print "\n"; }