On a very simple level, open STDOUT for "some other data' and open STDERR for errors.

#!/usr/bin/perl

use strict;
use warnings;
use diagnostics;

open(STDOUT, '>', 'results.log') or die "Can't open log";
open(STDERR, '>', 'results_error.log') or die "Can't open log";

system("pmpath ExtUtils::MakeMaker");
system("pmpath Acme::AandB");
[download]