my $outfile = 'outfile.txt'; system("cplusplusprogram >$outfile") == 0 or die "Couldn't launch cplusplusprogram: $!/$?"; open my $fh, "<", $outfile or die "Couldn't read '$outfile': $!";