@array=(); $n = $#array; # это номер последнего индекса, число записей - scalar @array; Если $n = -1 - то массив пустой, если $n = 0 - в массиве 1 элемент и т.д.