in reply to THANKS TO ALL: Passing huge args to system call

Probably not what you're looking for, but as long as you're calling perl (system "perl"...), why not... 
@ARGV=split /\s+/, $warn_list_arg;
unshift @ARGV, $comp;

do $perl_file or die "Program Exit: $!\n";

[download]

-- All code is 100% tested and functional unless otherwise noted.

In Section Seekers of Perl Wisdom