$Result = "";
open($ResultPipe, "./myprogram |");
while ( <$ResultPipe> )
{
    $Result = "$Result$_";
}
close($ResultPipe);