Здравствуйте, pretorian, Вы писали:
P>Подскажите, пожалуйста, как сделать следующее:
P>- необходимо в программу на Perlе передать имена двух файлов, например, в командной строке должно быть типа
P>first.pl one1.txt two.txt
P>Что необходимо прописать в программе чтобы принять имена этих файлов и сохранить в переменных в программе?
например, так:
#!perl
print $ARGV[0]; # это - первый аргумент
print $ARGV[1]; # а это - второй :)
Массив @ARGV — это все аргументы перлового скрипта. Поскольку выражение $#ARGV возвратит тебе индекс последнего элемента в этом массиве, то нехитрая комбинация $#ARGV+1 — это количество аргументов