my scripts: perl

четверг, 12 апреля 2012 г.

Входные аргументы
$ARGV[0]

$# оператор получения максимального индекса массива
if ($#ARGV<0) ... //нет аргументов