Perl How to get the index of last element of array reference?

Question

If we have array then we can do following:

my @arr = qw(Field3 Field1 Field2 Field5 Field4);
my $last_arr_index=$#arr;

How do we do this for ar

Answer 1

my $last_aref_index = $#{ $arr_ref };