LOL!

The simplest option is you tell the scripts what filename to write to, same as you tell it what filename to read -- Getopt::Long, so system $^X, 'foo.pl', '--infile', 'blah', '--outfile', 'blah';

Otherwise Capture::Tiny