"Off the shelf" ? You mean you want someone to write it for you for free?

To pass files to a perl script, you read it's arguments.

myperlscript inputfile outputfile
[download]

In myperscript

#!/usr/bin/perl
use warnings;
use strict;

my $inputfile = $ARGV[0];
my $outputfile = $ARGV[1];

print "$inputfile\t$outputfile\n";
#or process them here
[download]

To run it thru system:

system( "myperlscript $inputfile $outputfile");
[download]