use IO::Handle; 
$| = 1; 

$data1 = "./myC.exe  10 10 1 abc"; 

open PS, "$data1 |"; 
PS->autoflush(1);
while ($line = readline(*PS))  
   {  
        print $line; 
        print "\n";  
    }