$#array is the index of the last element of @array. Which is the same as the scalar(@array)-1;

Depending on which version of perl and the value of $[.     :)