Основной скрипт:
my ($x, $y) = (888, 999);
system('start', 'List Perl files', 'perl', 'other_script.pl', $x, $y);
Другой скрипт:
print "Args received = @ARGV\n";
<STDIN>;
Кстати, возможно, есть лучший способ для достижения ваших больших целей - например, организация необходимой функциональности в модули. Передача информации из одного сценария в другой с помощью аргументов командной строки и @ARGV
может быть проблемой и ограничивающим фактором.